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ABSTRACT 


The purpose of this thesis was to determine the feasibilty 
of incorporating a Sun Workstation into a Command and Control 
station to aid players in the execution of their roles in the 
Joint Theater Level Simulation. This entailed reviewing the 
possibility of eliminating the Postprocessor from the 
analysis phase of the game play. The Joint Theater Level 
Simulation is a theater independent computer game that models 
two~sided air, ground and naval combat, utilized for warfare 
training, joint operational and planning and doctrinal 
analysis. The products of this thesis will interface the Sun 
Workstation with the wargame’s host computer, the VAX-11, to 
provide the players the capability to access and analyze game 
data to improve their decision maaking ability. To meet this 
end, several software products were produced which 
specifically interfaced with the VAX-11, Sun Workstation and 
Ethernet. 
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A. WAR GAMING 

Of paramount importance in any combat situation is the 
ability of a commander to manage his forces and weapons 
effectively. For the commander to be able to execute his 
role in the management of these assets, he must be able to 
continually assess his own situation, and formulate his 
intentions relative to the most current data available to him 
at that instant in time. 

For many years models, simulations and games have been 
commonly incorporated as analytical tools to aid those in the 
“war fighting" business. Not surprisingly, within the last 


fifteen years there has been a renewed interest in the area 


of wargaming by the Department of Defense (DOD) as more 
powerful, reliable and reasonably priced computer systems 
have been made available [Ref.1]. A role for computers in 


battle analysis has perhaps finally found its niche within 
the military wargaming community. At all levels throughout 
the Department of Defense, emphasis is being placed on 
wargaming aS a very important training and analytical tool 
[Ref 2]. Up to now the emphasis has been placed oon major 
force and theater level applications. This drive is 


currently being headed by the Joint Chiefs’ of Staff Modern 


Aids to Planning Program (MAPP), which now provides the 
commanders in chief with powerful data processing 
capabilities for evaluating military alternatives in 


appropriate situations [Ref. 3]. 


Eee © URPOSE 

One of those theater-level applications is the Joint 
Theater Level Simulation (JTLS). Though the game is valid 
aS a simulation of theater level combat activities, in its 


current configuration, it has a major distraction which 


prevents maximum exploitation of the training Chatewieeorrones 
Presently, real-time analysis of game-generated data cannot 
be conducted while the game is being played. Instead, either 
the game must be temporarily halted and saved for later 
restart, or the game must be completely terminated [Ref 4]. 
Then a Postprocessor must be loaded and invoked through a 
sequence of time consuming steps by one of the controllers 
or players. This procedure requires the players of JTLS to 
learn more than just how to play the game. The players are 
now compelled to also learn how to make use of the 
Postprocessor in order to complete the analysis and critique 
phase of the gaming process. The players must therefore, 


endure both the disruption of stopping the game and the 


inconvenience of learning how to use another piece of 
software. 
This block one action is extraneous, cumbersome, 


inefficient and greatly distracts from the play of the game. 
We propose that the Postprocessor be eliminated altogether 
from this war-gaming system. In its place an alternative 
process needs to be developed that will allow the 
game-generated data to be sent directly to a database 
management system facilitating immediate use of the data by 
the player for on-line summary of current situational status. 
To preclude the need to continually run the large and 
cumbersome simulation to test the feasibility of this 
proposal, a major portion of the research of the thesis will 
be devoted to the formulation, testing and implementation of 
the Push, Pull, and Pack programs. The corollary goals will 

be: 
1) to have the data sent through the network by the Push 

ASST Ga eae accepted on thé Sun Workstation by the 
r 


2) to populate an ORACLE database with the data accepted 
by the Pull program via the Pack program 


3) to ensure that consistency exists between the data 
generated by the game with respect to the data now 
available in the ORACLE DBMS, and 


4) to execute several SQL*C formulated queries to 
demonstrate that there has_been no additional 
Seeemmerer ene aiselacenche of the Postprocessor 

In order to implement the proposal, we submit that Sun 
Workstations, which are now available aera the Naval 
Postgraduate School war laboratory, be incorporated into the 
currently configured local area network. The result of this 
modification will facilitate the game data being directly 
placed into the ORACLE DBMS. To complete the feasibility 
testing, a single Sun Workstation installed with the ORACLE 
DBMS will be dedicated to the querying of the database to 
provide this real-time game analysis. The actual number of 
Sun Workstations will have no imact on the present gaming 
configuration nor will it impact the development and 
implementation of the Push program. 

The proposed changes, if successfully incorporated, can 
only enhance the effectiveness of the game. The ability to 
do real-time/on-line analysis of the game cannot help but 
promote a greater sense of realism in the simulation game. 


Subsequently, Eticwwlil sSiguviicantiny “Contribute. to making 


the whole realm of Simulation gaming a more viable 
evaluation source of the decision-making process during 
times of stress and uncertainty. This change will provide a 


close replication of the demands placed on a decision maker 
during circumstances that cannot or are not desirable to be 


recreated in the real world. 


Pee LHESIS OUTLINE 

It is the purpose of this thesis to review the current 
implementation of the JTLS system and to test the feasibility 
oe incorporating a relational database management system 
directly into the playing phase of the game. In order to 
secomplish this, the thesis was partitioned into several 
chapters, each dealing with specific aspects of the current 
JTLS implementation to include both its software and 


hardware architectures. 


Following this introdwetery @ienapecm Chapter Si2aeic 
dedicated to the analysis of the actual pre jee The 
physical and temporal constraints of this project are 
enumerated. Detailed explanations to support various design 
decisions are presented to justify the options selected. 

The third chapter includes a very simple description of 
the JTLS game, Postprocessor and the essential user 
funcEPens fOreOoum. Only major aspects of these functions 
are discussed to provide the reader an opportunity to 
understand the peculiarities of the game and the user 
requirements of the current system. 

The fourth chapter consists of an indepth description of 
the INGRES DBMS, currently used in the query and analysis 
phase of the game play. 

Appropriately, the fe oie telln chapter explores the 
characteristics of the ORACLE DBMS. This chapter contains 
several examples of how specific ORACLE features contribute 
to the flow of game play. 

A very basic explanation of a generic local area network 
(LAN) follows in Chapter 6 with much emphasis on TCP/IP and 
their role in data transmission across the internet. This 
chapter is included to familiarize readers with appropriate 
terms, concepts and general implementation of an abstract 
local area networking system. For those who have had 
Significant exposure to networking, this chapter provides a 
very cursory review of pertinent topics in the networking 
Subject area. 

The seventh chapter has been devoted to the formulation, 
elaboration, implementation and analysis of the several 
software programs which are required to interface with the 
internet, the Sun Workstation and the ORACLE DBMS. This 
includes the inception of the various programs, flow charts 
of the algorithms and finally, a detailed narrative of the 


actual execution of the programs. 


Chapter 8 contains a brief outline of how the Relational 
Design was developed, coalescing data information from 
several unrelated technical manuals. The actual Relational 
Design 1S available in Appendix 

The last chapter contains conclusions and recommended 
areas for further study. 


Il. APPROACH TO THEVPR@EEEr 


A. TNT RODUCT LECH 

The question of why the Postprocessor was initially 
created must be answered in order to appreciate its role in 
the current configuration of this Ssimulatvenr Discussion 
with Rolands and Associates Inc., the current contractors of 
JTLS, reveals that the CALTECH Jet Propulsion Laboratory 
(JPL), the original contractors of the war game, wanted JTLS 
to be a distributed war-gaming system that would work as fast 
and efficiently as possible [Ref. 5]. With the complete 
Separation of a database from the war game, the contention 
for processor time on a single processor system was no longer 
a pPOInG “Gf “Concern. The VAX machine became a dedicated 
machine for the execution of the game. Therefore, the 
subsequent use of the Postprocessor, after the game had been 
stopped, had no impact on the execution speed of the game. 
The tradeoff between a fast game and the inconvenience of 
periodically stopping the game while waiting for the 
Postprocessor to read the many files to prepare the INGRES 
database was soon reassessed. The six to eight hours that 
were required for the Postprocessor to transfer the gaming 
data for an eighteen to twenty-four hour play period became a 
point for discussion, and a remedy was sought to reduce this 


wasted time [Ref. 6]. 


By PROBLEM CONSTRAINTS 
i i Application 


The basic characteristics of JTLS will be considered 


invariable for the purpose of this thesis. The actual 
execution of the war game will have no impact on the 
development and performance of the Push, Pull and Paci 
programs. 


2. slenouage 
The selection of SIMSCRIPT II.5 as the programming 


language of JTLS will not be changed. Aside from the 
obvious reason of having to transpose the entire algorithm 
into another language, a more difficult task is the 
selection of a suitable alternative Simulation language. 
SIMSCRIPT I1.5 iS a programming language especially 
developed to be used for this type of application ([Ref. 5]. 
Its close resemblance to FORTRAN makes it a language Our 
choice for many of the original programmers of JTLS who were 
already quite familiar with FORTRAN. 

SIMSCRIPT 11.5’s intimate compatibility with VMS 
allows the exploitation of the peculiarities of this 
operating system, resulting in fast and efficient execution 
of the game code, of the system calls and of all other lower 
level subroutines that other wise may not have been possible 
[Ref. 5]. As is the claim of so many other languages which 
are available today, SIMSCRIPT II.5 is extremely readable, 
requiring minimum documentation. Mesemimpertantly,se1t as 
very flexible, with provisions for access to many features of 
the VMS operating system which are not so readily available 
to other programming languages. Additionally. SLOSS RIL 2s 1b 
TI.5 is a very efficient higher-level language with an 
extremely high execution rate which is so essential in a 
sequentially read simulation program attempting to retain as 
close to a real-time scenario as possible. 

bee Programs 

The Push program is being developed to assist in 
testing the feasibility of reducing, and possibly totally 
eliminating, the use of the Postprocessor from the playing 
sequence in JTLS. This program accommodates the testing 
phase of this proposal by Simulating the data handling 
activities of the Combat Events Program (CEP). Through the 
implementation of the Push program, the need to repeatedly 


run JTLS as a data source to populate the ORACLE database for 


demonstration purposes is alleviated. After the termination 
Of am sinitial run of JTLS Seen Push program will use the 
saved files that were generated as its source of data fon 
later use. The Push program must be able to extract the 
data from these several files. 

Using the SEND and RECEIVE interprocess communication 
primitives available with TCP/IP, the data is sent via the 
Ethernet from the VAX to a Sun Workstation. There another 
set of programs, called Pull and Pack, were written to 
accept, parse, and finally populate the appropriate tables 
located in the ORACLE database. A hard fast constraint 
which was strictly enforced is that the transported data 
cannot be modified from it inception at game start through 
the time it is presented as information to an ORACLE based 
query. 

The reasons for the selection of FORTRAN as the 
language of choice for the Push, Pull, and Pack programs are 
several. FORTRAN has proven to be a very readable language 
and very easy to document, which is indeed a major advantage 
over such available languages as C. SIMSCRIPT II.5 was 
Originally considered as the language for the programs to 
maintain uniformity and total compatibility with the gaming 
code, and to reduce maintenance inconveniences. However, it 
was not chosen because of the local lack of availability of 
appropriate programming manuals and the scarcity of any 
experienced point of consultation when unable to surmount a 
SIMSCRIPT II.5 oriented programming hurdle. No other 
languages are currently supported by the VAX system in the 
Naval Postgraduate School war laboratory. 

4. Database Management System 

The U.S. Army decided to adopt INGRES as the Army- 
wide standard database management system. In response to 
this decision, JPL developed the Postprocessor to work in 
conjunction with the INGRES DBMS. Therefore, the INGRES DBMS 


is the relational database that the Postprocessor populates 


with data from the game files. INGRES DBMS was the preferred 
database for this research project. However, due to the 
limitation of funds, the war laboratory was not able to 
pueecure a copy of the INGRES DBMS for our use. 

Instead, the ORACLE DBMS was made available. ice icerey 
is a relational DBMS with many of the same features offered 
by the INGRES DBMS. Because the differences between the two 
DBMS’ are minimal, the ORACLE translations of the INGRES 
queries were anticipated to be completed with minor effort. 

5. Hardware 

The selection of the computer system cannot be 
changed be cause JTLS was designed and developed to be run 
exclusively on the VAX machine. Attempts to transport this 
war game onto another computer will entail a large effort in 
modifying the original algorithm to accommodate the software 


and hardware specifications of the other system. 


C. ANALYSIS 
1. Procedure 
Three different aspects of the proposed system were 
thoroughly analyzed. Pies weno maeiliiyv sot the Push, Pull, 
and Pack programs to correctly send and receive the 
time-sequenced data were extensively tested. Second, the 
correctness and consistency of the data processed by each 
program were ascertained by simply comparing the data with 
those in the game generated data file. Finally, to aid in 
the development of the database tables and to ensure the 
correctness of these tables, a comprehensive and thoroughly 
documented Semantic Data Model and Relational Design were 
constructed. 
eee Database Population 
Currently WES is operated as a stand-alone 
Simulation with no dedicated DBMS. This precludes a rigid 
and controlled analysis of the game situations from being 
performed as it is being played. For such analysis to take 


place, the game must _ be halted and the Postprocessor 


invoked. Following the invocation of the Postprocessog, 
the players must wait until all the data have been read from 
the 69 various game generated files. The time it takes to 
transfer the data is related to the amount of data that is 
available on the files. Experience has shown that for a 
game that has been played for approximately eighteen hours, 
the transfer time is between six to eight hours. Following 
this inordinate amount of waiting to populate the INGRES 
database, the players are finally able to query their data 
source for situational summaries and, pertinent battle and 
TOogiStics “reports. 

The thrust of the thesis, as already outlined, are 


manifold. Initially the creation of the Push, Pull, and Pace 


programs must be completed. These programs will lend 
credence to the proposal that a database system on an 
internet can being run on a separate computer. The final 
result 1s the elimination of the Postprocessor and 
consequently, the availability of an on-line, real-time 
querying capability. Next, a complete Relational Design for 


the JTLS database must be developed. The model must be used 
to construct the needed tables to be populated by the game. 
The Pack program will then access those tables and populate 
them with the required data. The populated database 15 
made accessible to the players as the game is in progress. 
The Push program will simulate the game in progress with the 
time-stamped data being placed into the Ethernet at the 
specified times. 
Jee Data Cons tseency 

Expected data consistency 1s perhaps the most 
essential part oof this entire project. Without the proper 
transfer of data, the entire feasibility test fails 
regardless of whatever else has been accomplished. Although 
the Postprocessor 1s cumbersome and time intensive to use, 
information is nevertheless being generated. Should the 


Push program fail to transfer consistent data, then less 


10 


information 1S made available to the game players. No 

deviation from what the game generates can be tolerated. 
Several runs were be conducted to help generate a 

consistent set of data for analytical purposes. It is 


assumed that the network 1s reliable [Ref. 9]. 


Jat 


III. JOINT THEATER LEVEL SIMULATION 


Aw ENTRODUCTION 


For the purposes of this thesis a complete description 


of the user interfaces or the application  prograg 
characteristics Will not be ineludede Literature to that 
effect is already available in such publications as 
Postprocessor User Guide ([Ref. 4], and JTLS Executive 
Overview [Ref. 5]. Instead, only those Minimal features 
which contribute to the reader’s appreciation of tite 


complexity of a simulation game will be presented. 


By JOINT THEATER LEVEL SIMULATION OVERVIEW 

The JTLS is a computer-assisted wargaming system that 
models two-sided air, ground and naval combat. The system 
runs on Digital Equipment Corporation VAX minicomputerspagee 
include the 11/780, 11/785, and 8600 [Ref. 5]. 

The noteworthy points that set JTLS apart from almost 
all other wargaming models become evident after noting the 
enormous effort placed in the design and development of an 
efficient and effective total system. These considerations 
are outlined below: 


1) The primary software language, SIMSCRIPT II.5, was de 
Signed for creating simulations. 


2) The user-machine interaction permits inputs and 
outputs to be available at independent dummy 
ESEMimals:, 

3) A message-handling system and screen menuing 
Capability 1s provided to the user. 

4) An expandable memory Sa FNC EN allows increased 
database requirements to be accommodated [Ref 4]. 

5) The design facilitates future product improvements. 

6) Configuration management procedures provide for 
ongoing visibility and control of softewareyand 
documentation. 


7) A rather important user feature is the ca abe te 
run the game faster or slower than real-time. During 
large scale battle problems, a great deal of time may 
be spent searching for the opponent’s forces, preparing 
to receive logistics, preparing positions, euc ase 
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the problem were to run at real-time, the articipants 
ees ppene NanyvewelwomvelE tag LOG weme enemy CO be 
detected. By allowing the game to run faster than 
Bo icles POsSlole EO “Smonten the detection 
hase of the problem. Once. the actual conflict 
egins, the warfare simulation can be run at real-time 
speed or slower. 


8) Possibly the most impressive feature of JTLS 1s that, 
the game runs as close to real-time as is possible in 
a Beooeem that is sequentially executed. his means 
that the user has the same amount of time to act or 
beaCtmboucact Leal situations as he would in real 
FOUR ECeS Melis ls Chis iecatune that makes JTLS such an 
effective eka eeu tool. This powerful feature will be 
SAbPrecau tureher by Ehe added ability to analyze the 
Bene taeseal-time. The ability to query the database 
o determine what 1s happening at any page oul 
moment enhances the sense of realism. f course due 
to the "fog of battle", not all information should be 
readily available to the players. However, this lack 
of information or misinformation will be deliberately 
rogrammed into the game algorithm, further simulating 
he "heat of battle". 


Peeecurrent Configuration 


The current JTLS system is a sequentially executed, 


user interactive, event-driven simulation. In a future 
version of JTLS, 1t has the potential of becoming a 
distributed war-gaming system. However for now, the system 


software 1s executed on a Single, central stand-alone VAX 
computer. All the executive functions are thus performed on 
that single computer. 

In this configuration the JTLS executive functions 
are divided into two main groups. These function are the 
user interfaces and the execution of the simulation game. 
The user interface function is performed through the Model 
Interface Program (MIP). To activate each user’s MIP, the 
player must go through a login procedure at the start of 
game play. These terminals are the only means by which a 
player will make his input available to the game. 

JTLS can currently Sqlyserouaie a maximum of 28 
workstations/terminals and 10 graphic screens [Ref. 5]. Two 
of the terminals are used by the technical coordinator whose 
responsibilities include: 

meee stabi-up of the graphic processor, 
2) control of the Postprocessor program, 
3) Start-up of the CEP, and 
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4) saving the output from the execution of the CEP. 
At least one terminal will be made available to the 
game controller. In this capacity, the individual will 


1) be, able to modify the data parameters in the 
lnitial database, 


2) be able to modify the logistics for any playereen 
the game, and 


3) be able to control the movement of the units in 
the game. 


To manage the simulation of the commander’s role and 
decision making process in actual combat, the Blue Commander 
and the Red Commander will each be assigned one terminal. 
From his respective terminal each commander has the ability 
to observe the graphics screen, hold staff meetings, request 
reports and dictate guidance. The remaining 23 terminals may 
be used by supplementary game controllers (if required), 
additional Commanders, Air players, Intelligence players or 
Logistics players [Ref. 5]. In addition to the textual 
information available on the terminal screens, each of the 
available graphic screens may be assigned to one or more 
players of the same side. The minimum configuration for 
game execution consists of at least four workstations. There 
1s one station dedicated to the Red Commander, one station to 
the Blue Commander, one station to the game controller, and 
one station to the technical coordinator iecrt woe 

2., HhelModels titer race sh mecdscm 

JTLS receives user commands through the MIP. The 
MIP is an interactive program called by each of the players 
located at an active terminal. A player MIP provides 
continuous interaction between the CEP and the player. 


The MIP provides the users with the following 


capabilities: 
1) entering orders; 
2 processing orders; 


) 
3) communicating between players and controllers; 
a) 


communicating between players and the combat 
Simulat von, 
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Beacecessoing and using Support information; 
6) saving directives in archive files; 

7) analyzing Postprocessor data; 

ae CONELOMEiIng graphics output; and 

9) stopping or temporarily halting the game. 

The number of stations and MIPs needed is a user 
variable, and is dependent upon the exercise or the system 
application. Through the MIP each player is able to 
Mmeansmit his decisions, in the form of orders, to the CEP. 

The CEP is the warfare-simulation model around which 
JTLS is developed. The modules included in the CEP simulate 
the movement and interaction of land, air and sea forces for 


the two-sided combat. 


fe FOoLPROCESSOR 
The JTLS Postprocessor is a tool that is used to 
generate information for wargame analysis. The primary 
software tool used by the Postprocessor is the Interactive 
Graphics and Retrieval System (INGRES), a commercial 
relational database management system produced by Relational 
Technology, Inc. INGRES is augmented by a menu system for 
ease of use and a separate user-controller data recording 
and assimilation mechanism. The Postprocessor can be used 
during a game pause or after game termination. 
1. Initiation During a Game Pause 

A game pause occurs when the game sequence reaches a 
CHECK POINT command inserted by a controller throughout the 
play of the game. Within a few seconds after the 
recognition of the command, each player’s monitor will 
display the word PENDING on the far right-hand side of the 
first text line visible on the screen. Each player enters 
READY to cause his MIP to save important data into a file. 

The player that logged on the JTLS system as PLAYERO1 
is designated the Primary Controller for the JTLS exercise. 
The key responsibility of the Primary Controller, beyond the 


responsibilities shared by the other Controllers, is the 
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decision wre Mnatrace the Postprocessor during the game 
pause. 

When the Primary Controller invokes the 
Postprocessor, the data preparation phase commences. During 
this preparation phase all the output produced since the 
last time the Postprocessor was used or since the beginning 
of the game (whichever iS appropriate) is transferred from 
the game generated files into the data tables available in 
the INGRES DBMS [Ref. 8]. Next, INGRES examines the data it 
has assimilated and modifies the internal storage of the 
data to allow for quicker response to a player’s queries. 

2. Initiation After Gaming sessmen 

To run the Postprocessor in "stand-alone’ mode 
(outside the context of the gaming session) the player must 
know the name of the Postprocessor database that will be 
used for analysis. Once the player has initiated the JTLS 
Postprocessor, he is ready to retrieve and analyze data from 
a particular Postprocessor database. 

The Postprocessor classifies queries in a 
hierarchical fashion. Beginning at the Entry Menu, the 


player decides which of the four broad classes of information 


1S “Or Pinterest- These four classes are combat systems, 
logistics, air assets, and targets [Ref. 4]. After making 
the first choice, the player makes further choices, 
narrowing the query to a specific topic. The player directs 


the search by entering the number that is displayed on the 
menu next to his choice. 

If the query requires the Postprocessor to produce a 
report, the player will be prompted for a report title 
immediately after he selects that option. The report, with 
the security classification and title, will be displayed on 


the terminal scereen-. 
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IV. INGRES (Interactive Graphics and Retrieval System) 


ae «CENT RODUCTION 
INGRES is a database management system well suited for a 
wide variety of applications. For example, application 


programs written in C may access INGRES databases through a 


SEQUEL interface [Ref. 8]. Skilled database users can meet 
their information management needs by utilizing QUEL, an 
interactive non-procedural query language. For those using 


INGRES in conjunction with the JTLS game, a menu-driven set 
of queries is provided. 
BE. GENERAL DESCRIPTION 


INGRES is one of several DBMS’ that does not maintain 


any functional distinction between attributes and domains 
Meer. 8). These two terms are often used interchangeably in 
literature dealing with INGRES. However, in this thesis 


the terminology will be restricted to the word attribute. 
Peso, OL particular interest is that this lack of an explicit 
domain does not preclude any theoretical implications 
arising from the definition of relations from the cartesian 
product of a set of value domains ([Ref. 8]. 

1. Database Constraints 

The only global assertion which applies to the entire 
data base is the distinction between the database owner (DBA) 
and other users. There 1S a system relation known as the 
USER’S file which contains the information specifying which 
databases can be opened and by whom. 

The creation and destruction of databases are tightly 
coupled to the VMS operating system. As a result, INGRES 
enjoys the flexibility, power and security of the VMS file 
management system. Also, INGRES 1s written in C, and 
therefore requires a C compiler which is available on the 


VAX-11 located in the war laboratory. 
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2. Operations 
in JTLS the game contre lem 1s given the 

respons itbod lity or the Database Administrator. The game 
controller is privy to a selection of commands unavailable 
to the normal user. Two such commands relevant to the state 
of the database are: 

CREATDB - Establishes a new, initially empty database 

with a given name. The user who issues Ehe CREATDB 

command 1s the owner of the database. 


DE Ue - Destroy a database, whether it is empty or 
oiler 


A relation is defined as a subset of the cartesian 
DEOduUCcE of N sets of attribute values [Ref. 8]. It its 
generally assumed that the user’s perception of relation is 
an entity over which functions and/or predicates can be 
evaluated. It is also possible to visualize a relation as a 
table in which the tuples are always removed when relations 
are updated. 

There are a number of operations available in QUEL 
which relate to the relation and are extensively called by 
the Postprocessor: 

CREATE - Creates a new relation with a given name. 

The user .1ssuing the CREATE command is designated as 
the relation owner. The owner of each relation in the 
dems 1s the game itself as it creates each needed file 
or data input. 


COPY - Appends the data ina VMS file to an existing 
relation generated by the game. 


DESTROY - Deletes a named relation from the database. 


INDEX - Creates secondary indices on existing 
relations. 


MODIFY - Defines the storage structure for a relation 
iktormation G2 Svailable-in Appendie @. 
SAVE - Changes the default relation expiration date. 
These relation operations may be issued only by the 
owner of a relation. 
3. Views 
Views are defined as a set of dynamically derived 
relations [Ref. 9]. A view structure 1s essentially a 


relation structure which has its operations restricted. 
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thas LuUnNCEYON is extensively used in JTLS to insure that 
game players cannot access tables belonging to their 
opponents. 

Views are defined from relations in the database by 
the use of the DEFINE command. This command is generated by 
the Postprocessor, which also supplies the parameters for 
the command. As with all QUEL commands the game controller 
has the option of overriding the DEFINE command as he may 
deem appropriate. View definition can be specified as a 
subset of the values in the base relation by means of a 
qualification statement identical to those used in retrieval 
commands. No other form of view manipulation is possible. 
All forms of retrieval on the view are fully supported. 

Although views are directly derived from relations, 
they cannot be manipulated as relations can be. Updates are 
supported if and only if it can be guaranteed that the 
result of updating the view is identical to that of updating 


the corresponding real relation. 


4. Tuples 
A tuple is an instance of a relation. toes 
implicitly defined when the relation is created. Keys are 
defined at the relation level and only for purpose of 


defining storage structures. 

There is a wide variety of operations in QUEL for 
manipulating tuples. Since the query language for INGRES is 
based upon relational calculus, tuples are selected from a 
relation which is represented by a etuple-variable. A 
tuple-variable is defined by use of the RANGE statement. 
Once a tuple-variable is defined, the definition remains in 
effect until it is redefined or the game controller ends the 
QUEL session. Operations for manipulating tuples are 
completely controlled by the Postprocessor and include: 


APPEND - Adds a tuple or tuples to an existing 
relation. 


DELETE - Removes one or more tuples from a relation. 
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REPLACE - Modifies one or more attribute value in one 
or more tuples of a relation. 


RETRIEVE - Retrieves a subset of the tuples from a 
relation. Each of these operations can include an 
these qualifications select a subset of Chen 
a relation represented by a tuple-variable. 

Tuples may be ordered, but only if the storage 
structure for the relation has key ordering. When new 
relations are formed from the retrieval of tuples or a 
subset of the attributes of the tuples, duplicates are 
always removed. Tuples retrieved for display do not have 
duplicates removed unless the UNIQUE keyword is specified in 
the RETRIEVE statement. 

5. Attributes 

The names and characteristics of attributes are 
defined when tthe relation which contains them is defined. 
Attributes in conjunction with tuple-variables can be used 
in QUEL qualifications statements. These attributes are 
combined in qualification statements with boolean algebra 
and relational operators as well as implicit existential 
quantification. The power of the quantification statements 
is extended by the inclusion of a large library =m 


computational and aggregation functions. 


CC; SYSTEM ARCHITECTURE 
1. Operational Aspects 

INGRES provides a high level of access control with 
the DEFINE PERMIT command. This command is issued by the 
Postprocessor to restrict the access by opponent players to 
the relations and/or attributes of a relation. This command 
is very flexible because it also allows restriction of the 
type of operation which may be performed like retrieval, 
update, etc., as well as time-date access constraints. Data 
dependent access control 1S supported since the PERMIT 
command allows a qualification to be specified which 


restricts access to a subset of a relation tuple. 
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Though as INGRES is presently employed with JTLS, 
concurrency iS not an issue, INGRES can support concurrent 
update at the discretion of the game controller. It uses a 
preclaim algorithm to avoid deadlock [Ref 8]. The locking 
granularity is at the relation level but has the capability 
of working at the page level. 

2. Benefits of a Relational Database 

As a fully relational database, INGRES clearly 
provides the following conveniences and facilities that 
otherwise would not be available: 


SIMPLICITY - INGRES interfaces are based upon pony 
usable extensions to the relational calculus. Asa 
result, a small uniform set of operations provides a 
wide range of selective power. 


UNIFORMITY - As the basis for INGRES DENS OS the 
relational calculus exhibits eee Ee. Lee: 8}. Closure 
1s a desirable property which simplifies user 
interaction with the database. 


DATA INDEPENDENCE - As a fully relational database, 
INGRES provides a high degree of data independence. 


OPTIMIZATION - As implemented Se the Postprocessor, 
information about the storage structure themselves 
allow the storage structures to be optimized [Ref. 8]. 
Ai ota epeemzabLon leads to faster response times for 
commonly used retrieval specifications. 


BASIS FOR HIGH LEVEL INTERFACES - The data 
independence, See ce oh pent ey Of INGRES data 
representation and operation make high level interfaces 
possible and practical. 


SECURITY - Security seems to be a distinct advantage 

to relational databases since the access control rules 
for DEFINE and DEFINE PERMIT use the same techniques as 
other operations like retrieval and update. 
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V. ORACLE DATABASE MANAGEMENT SYSTEM 


A. INDECRUCILION: 
Relational Software Incorporated (RSI) began development 


of ORACLE database in 1977 and demonstrated a prototype 


relational system in 1978. The first copy of the ORACLE 
Database Management System (DBMS) was delivered for public 
use in June 1979. Row claims that ORACLE is a DBMS 
especially designed for those personnel with minimal 


computer experience. 

RSI also promotes ORACLE as especially useful in an 
environment in which the DBMS must interact with several 
different computer hardware systems and different operating 
systems. Several versions of the software have been 
developed specifically to exploit the peculiarities and 
idiosyncrasies of specific machines and operating systems. 
A version of ORACLE exclusively designed for use on the Sun 
Workstation, and developed to interact and exploit system 
services on the UNIX is now available for installation in the 
War Laboratory. These characteristics enhance the speed and 


efficiency that queries can be processed by ORACLE. 


B. IMPLEMENTAION 

These several features have proven to be significant 
factors in the currently favorable interest expressed by the 
PEOPOnenES “OF VUibs. 

1. General Description 

The hardware requirements of the ORACLE DBMS are very 

similar to those of INGRES. A memory allocation of at least 
4 megabyte is required. The disk space of 14,000 1K blocks 
fons ORACLE DBMS distribution and task images are also a 
necessity. The database uses at least 4500 1K blocks for 


the user database files and before image files. The Sun 
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UNIX operating system release 3.2 or later is needed to run 
ORACLE on the Sum ‘Workstation. 

The ORACLE DBMS architecture takes advantage of 
several Sun UNIX features that allow an ORACLE system to 
Share both executable code and data among several programs. 
These features are outlined below: 

1) System Global Area - The SGA 1s a_shared memory 
region that permits multiple Rega toes or users 
to access the same data. All CLE preqrams must 
have access to the common data structures that the 
Dox contains: 

a) LOCKS, 
b) queues, 


c) transaction recovery information, 


d) process control information, 
e) system configuration information, 
f) before image buffers,and 


g) database buffers. 

Each active ORACLE system has one SGA which 

Soe tismenc  NoOcartens FOr 1ts database files and 
before image files. 

2) Shadow process - In the two task architecture of 
ORACLE implementation, each Seen task 
Sigsines cl ecee poner” Shadow task. The. shadow 
task constitutes the ORACLE kernel, and 1s the 
only foreground process that has access to the SGA. 

3) Interprocess Communication - Interprocess. 
Ziiebede ron wls ene abplity to Cranster either 
control or data information from one process to 
atiemicr me UnGoryolm UNTX> a variety of two- task 
drivers may be used for this purpose. 

Za, Data Structure 

The ORACLE database system 1s composed of a database, 
and its relations, views, tuples, records and domains. 
These database components are interrelated in the following 
manner. A relational database consists of relations of 
possibly many different types. Aeeecelaeclrony CONnStusSes —-Of 
tuples of the identical type. A view is derived from one or 
more relations by means of a projection and the subsequent 
use of the qualification operations. A tuple consists of 
item values of possibly different types. A domain is 


defined in terms of a user defined data type. 
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An ORACLE database consists of a set of relation 
definitions which are stored in system-maintained relations. 
It also consists of a set of stored tuples for each relation 
and a set of views. A view is simply a set of virtual 
relations defined on base relations [Ref.9]. A database is 
named by assigning the user created name to the file when the 
database is initially created. 


A relation is defined as a two dimensional table of 


data items. This allows the visualization of a relation as 
a table of rows and columns. These relations within a 
database are assigned unique names at the time of 
Geb rnit 2ons In ORACLE duplicate tuples are permitted, 


although the system will enforce a uniqueness requirement 
for a primary key if it 1s specified in the definition. 


ORACLE supports a uniqueness requirement for any 


attribute the user wishes to use as a primary key. Primary 
keys must be indexed. In addition, the system will reject 
the NULL values in inserted or updated tuples. The first 


attribute defined for a relation must be assigned a value 
when a tuple 1s inserted. 


cle Set Operations 


Oualiliteacion nba ORACLE 1s calculus oriented 


[Ref.10]. Qualification results may be thought of as a 
relation populated with qualified rows. Qualification can 
be used with retrievals, updates and deletion. 


Set operations are not directly supported by ORACLE. 
Instead, they are accomplished using combinations of other 
SOL Operators; JOIN, in ORACLE, is handled by means a Of 
restriction in the selection criteria subject to the 


following: constrain: 


1) reflexive JOINS require using a different table. 
Gene for each table reference to the base relation, 
an 

2) up to 255 relations can be joined, and 


3) items used for specifying JOINs need not be 
indexed. 
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The queries for the INGRES DBMS were written in QUEL. 
Since the queries used by the players were entirely menu 
driven, a great deal of interaction was required between the 
INGRES~based application programs and the VMS operating 
system. This same situation is repeated with the use of the 
ORACLE DBMS. The queries will again be totally menu driven, 
requiring the ORACLE application programs to interface with 
the UNIX operating system. In ORACLE this will be made 
relatively simple by using the SQL*C language provided. 

SQL*C is a self-contained language used for data 
@efinition, selection, query, update and interfacing with 
other compatible environments. It is also used to define 
relations and attributes, to insert, modify or delete 
tuples, and to retrieve relations or projections on 
relations. Finally, it can be used to take advantages of 
system routines already available in UNIX oor used to create 
needed subroutines to achieve a desired effect. The 
SQL*C commands are relatively straightforward using a_ great 
number of mnemonics and English keywords. For example, 
selection is based on relational calculus with the criteria 
specified in a WHERE-clause. The language is user-driven and 
1s normally intended for ad hoc query and update. TO 
accomplish this SQL*C can be used on a stand-alone basis, 
but more usefully it can be embedded in user-written 
programs to facilitate the construction of menus and program 
interfaces. 

5. security Features 

As with the INGRES DBMS, views are again extensively 
used in ORACLE to accommodate the JTLS game play. Views are 
used to limit player access to specific columns of a table 
or to selected tuples. Views also provide a means for 
Bestricting types of access such as read or write and by 
whom. In ORACLE, views are defined as dynamic virtual tables 


comprised of a selected portion of the database. Since the 
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views are derived by selecting qualified tuples” freon 
base relations, the keys are inherited from the base 
relations. 

In addition to the VIEW feature, the Sun “UNG 
provides additional security assets. These features include 
file ownership, group accounts and the ability to have a 
program change its user-id upon execution. 

Security is also enhanced by the two-task 
architecture of the ORACLE DBMS implementation. A division 


of work and address Space exists between the user program 


and the ORACLE program. This allows an enhanced security 
scheme since all database access 1s achieved through the 
shadow process and special authorizations on the ORACLE 
program. 
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Vi tHE OPEN SYSTEM INTERNET MODEL 


A. INTRODUCTION 

Within Department of Defense (DOD) the internet protocol 
most commonly used is IP [Ref. 3]. For this reason the U.S. 
Army has expressed much interest in utilizing this network 
component in its distributed war games. The current 
configuration of JTLS will need to be modified to include 
the capacity to incorporate internet communications. This 
proposal is currently under consideration by the responsible 
proponents of JTLS. 

For the sake of standardization, the generic network 
system 1s designed as a series of layers with each layer 
Performing a Specific function called a protocol. Through 
this hierarchy of protocol layers, it is made much easier 
for one computer system to establish a communication link 
with another computer system, and pass the desired data 
correctly across the network. Also this system of hierarchy 
precludes any of the higher levels being concerned about any 
of the low level functions required. To provide 
communication services, each layer must exchange’ the 
required signals with its peer layer across the network. 

Stratifying the network system allows each layer to view 


its set of lower layers as providing the services needed to 


complete its role in the networking hierarchy. The means by 
which the lower layer accomplishes this task is of no 
concern to the upper layer. Of particular interest in this 


thesis are the roles the IP and TCP layers play in the 


network hierarchy. 


i. PNTERNET PROTOCOL 
i DESCRIPTION 
The Internet Protocol (IP) is designed to provide the 


necessary functions to deliver a package of bits (datagram) 


Ze 


from one host to another [Reta aime The IP has a numberg@en 


features which enable the protocol to send datagrams across 


connected networks. The first of these features allow the 
IP datagrams to be fragmented into smaller packets. This is 
extremely useful when the intervening networks do not 


permit packets as large as the created intact datagram to 


CEOS S:: These fragments can then be reassembled at their 
destination using information contained in the IP header 
[Ref. 11]. Since it is expected that all data generated by 


the game will be sent over a single network, this feature 
will not be elaborated. 

For most networking tasks, the minimum underlying raw 
data transfer services provided by the Data Link Layer is 
too limited. Thus, the second major feature of the IP is to 
provide the needed power to transmit data through the 
internet at the Network layer. Basically, the job of the IP 
is to. Interconnect ~one ~orm@mone packet handling networks 
into an internet. The IP provides its services to various 
upper layers by assisting the delivery of these data packets 
through the internet. The IP is limited to the basic 
functions required for delivering a datagram through an 
internet. Each IP datagram crossing an internet 1s an 
independent entity, unrelated to any other datagram [Ref. 
Las The host’s IP layer provides services to the Transport 
layer and relies on services from the Data Link layer. The 
IP layer takes data sent by a Transport layer and uses the 
services of the Data Link layer to forward the data to the 


IP layer of the destination host. 


The IP does not promise a reliable service. Hosts 
receiving IP datagrams will discard the datagrams when 
insuriierent resources are available for processing, and 


will not detect datagrams lost or discarded by the Data Link 
layer. 
The IP insulates the upper layers from any network 


specific characteristics. To accomplish this an additional 
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service provided by the IP includes selectable levels of 
transmission behavior involving such characteristics as 
precedence, reliability, delay and throughput. The IP also 
allows data labeling which is needed in secure environments 
to associate security information with data. 

2. Implementation 

Transmission begins when a protocol of an upper layer 
passes data to the IP for delivery. The IP packages the 
data as an internet datagram and passes it to the Data Link 
protocol layer for transmission across the local net. The 
IP sends the datagram through the network directly to the 
mest . 

The IP does not only provide services to the upper 
level protocols. It requires support from the lower levels, 
including a transparent data transfer between hosts with a 
Single subnetwork as well as error reporting. Datagrams may 
not necessarily arrive in the same order they were supplied 
to the subnetwork layer, nor 1s data guaranteed to arrive 
error free. The lower level provides reports to the IP 
indicating errors from the subnetwork and lower layers, as 
feasible. The specific error requirements of the subnetwork 
layer are dependent on the individual subnetwork. Ethernet, 
the DECNET software in use in the war laboratory, does not 
generally report errors except, for example, when a 
particular packet needs to be discarded because of 16 
consecutive collisions [Ref. 12]. Since the IP datagram 
delivery 1S not considered infallible, how an IP module will 
react to information from a lower layer about’ the 


disposition of a particular packet is largely unspecified. 


C. TRANSMISSION CONTROL PROTOCOL 
Po Description 
Generally TCP provides services at the Transport 
Layer and IP provides services at the Network Layer. The 
Transport layer is designed to provide a machine with 


end-to-end subnet independent connections and transaction 
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services. The lower layers of the International 
Standardization Organization (ISO) model are concerned with 
the transmission, framing and routing of packets between 
machines. The Transport layer, however, has the task of 
providing reliable and efficient end-to-end transmission 


services between processes rather than simply between 


machines. All four levels - physical, data link, network and 
transport - work together to provide a complete transpame 
service. Providing the robust and transparent communications 


upon which upper levels of protocols may then be built. 


TCP is designed to operate over a wide variety of 


networks and to provide virtual circuit service with 
orderly, reliable transmission of the user data. The 
Virtual Circuit sconcepeemrs implemented by associating a 
series of packets with one another. The goal of this 


association is to provide a service by which applications 
can talk with one another just as though they had a 
physical point-to-point e ink (Rer .eeue 

2. Implementation 

TCP supports a wide range of upper level protocols 
which need to send data to their peers on the other host. 
TCP does not attempt to impose any structure on the data 
sent by a given upper level protocol. It simply treats the 
upper level protocol data as though it were a continuous 
stream, thereby leaving all notions of message structure in 
the hands of the upper level protocols themselves. TCP does 
however, attempt to segment the stream into discreet units 
so it can be sent and received in individual packets. Each 
of these packets 1s called a segment. 

To maintain a reliable host-to-host connection for 
the purpose of transferring data, the TCP functions include 
establishing internet connections, transferring data and 
ensuring adequate flow control. A major function of TCP is 
to provide data connections between pairs of upper level 


protocols. Before any data transfer can occur, a connection 
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has to be made between the two hosts. TCP does this through 
the use of a three-way handshake. Port numbers are assigned 
to each end of the Comieecealonacmeeo, 1dentify the logical 
channels to which the data should be sent at each host. TCP 
is also responsible for breaking the connection once the 
application layer is finished. This activity is referred to 
as connection management. Connection management can be broken 


down into three phases: 


1) connection establishment, 
2) connection maintenance, and 
3) connection termination. 


Connections are endowed with certain properties that 
apply for the lifetime of the connection, including security 
and precedence levels. These properties are specified by 
the upper level protocols at connection openings. TCP 
provides a means for a upper level protocol to actively 
initiate a connection to another upper level protocol 
uniguely named with a socket. A socket is actually the 
concatenation of an IP address with the application’s port 
number [Ref. des Ns A connection is defined by the 
combination of the two participants’ socket numbers. 

Once a connection has been established, TCP will 
maintain it as long as both parties are interested in 
keeping it active. Connections which are established but 
which are not actively sending user data do not generate any 
packets. This is not a _ problem, but it 1S interesting that 
TCP does not specify a mechanism for detecting the loss of a 
connection partner when no data are being exchanged. Bue 
Since for some applications such information is of use, some 
TCP implementations use a trick to accomplish the detection. 
They send a datagram with no data and an incorrect sequence 
number. TCP specifies that the recipient must respond with 
a datagram indicating the correct sequence number. IDE Baye: 
response is received, the probing TCP may be able to decide 


that its peer has disappeared. 
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Established connections can be terminated in either 
of two ways: 

1) Graceful close - Both upper level protocols close 
their side of a duplex connectionpee renee 
Simultaneously or sequentially, when data transfer 
1s complete. 

2) Abort - When one me level protocol unilaterally 
forces closure of the connection, TCP does@inee 
coordinate connection termination. 

Flow control mechanism permits a receiving TCP to 
govern the amount of data dispatched by a sending TCP. The 


mechanism is based on a window which defines a contiguous 


range of acceptable sequence numbered data. As data are 
accepted, TCP slides the window upward in the sequence 
number space. The current window 1S specified in every 


segment and enables the peer TCPS to maintain up-to-date 


Int Ormat lon: 
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VII. PROGRAMS 


A. PILRODUCTION. 

The files, code, code description, and variable 
descriptions for programs are in Appendices A through L. The 
flowcharts are in Appendix L. The Appendices are provided to 
compliment the following discussion, and to support the 


actual implementation of the feasibility test. 


pee PUSH PROGRAM 
1. Files 
Conceptually, the Push program has been developed to 


Simulate JTLS pushing game data onto the internet as if the 


game were in progress. In practice, the program uses data 
files from a completed game, and transmits individual 
records from these files across the network to the Sun 
Workstation. The program sends these records in 


chronological order simulating sending these records as if 
they were being generated by the game. To accomplishes 
the time attribute from each record is determined and 
compared with the Push program generated clock. Additionally 
the order, domain and ranges of each record attribute must be 
determined and entered correctly on the Sun Workstation. 
This entailed a complete analysis of the data files as the 
first step in the development of the Push program. The 
Postprocessor User Guide [Ref. 4] contains an administrative 
listing of tables and attributes assembled in alphabetical 
order. Also the size of each numeric column is described in 
byte size, rather than the number of required characters as 
required by ORACLE. A comparison of the game files with the 
Postprocessor User Guide [Ref. 4] and the Data Requirements 
Manual [Ref. 13] furnished an assessment of attribute order 


and ranges. 
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Sixty of the sixty nine Postprocessor files wee 
generated by the CEP and can be utilized by the )biaee 
program: The DATA BASE, DICTIONARY, and DIRECTORY files 
contain administrative data and reside permanently on the 
Sun Workstation. The files COMBATSYS, REASONS, SUPPIITEE 
TARGETS, and UNITS are produced by the Scenario Preparation 
Program, and are used to match data produced by the CEPR 
report format purposes. The parameters of these data tuples 
can be manipulated by the game controller. These files 
should be transmitted to the Sun Workstation prior to the 
game. A subset of the CEP produced files associated with 
aircraft was selected for the demonstration of the Push 
program. The first step of the program was to create a 
corresponding time file for each data file to determine when 
a game record should be transmitted across the network. A 


time file was linked to the appropriate JTLS data file by a 


logical unit number. Each data file was assigned a unique 
logical unit. The numbers started at 10 to prevent utilizing 
a unit number reserved by the operating system. The 


corresponding time file was initially given the same logical 


unit assignment. However, in doing this the desired results 
were not obtained. For reasons unknown this method did not 
send data in the prescribed order. This was correct edie, 


reassigning the time file the next sequential number of its 
lanked “relatrom datafile, The maximum number that can be 
assigned to a logical device is ninety nine. As a result a 


maximum of forty five data files, and forty five time files 


can be used in this program. Each time file was created by 
using a definite iterative JeO-leom. The loop cContmem 
variable, UNT, was initiated to the value of the fie. 
logical unit number, increased by two, and terminated with 
the value of the last logical unit number. Each V@ep 


iteration invokes subroutine GETIME to create the time file. 
The data and associated )e1me files are rewound 3ee8 


subsequent processing. 
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ae GETIME Routine 

Subroutine GETIME reads the first thirteen characters 
of a data record into a character string to determine the 
elements of the time attribute. Data analysis revealed that 
the attribute TIME is the second attribute in all files, 
preceded by the attribute INTRVL. Although the range for 
INTRVL is 3276/7, interviews with JTLS contractors revealed 
the possibility that the length of INTRVL exceeding one 
character 1S remote. Further study of the data determined 
the minimum number of characters in attribute TIME is two, 
and the maximum number is ten. Therefore, only the first 
thirteen characters of each record were required to be read; 
one character for the interval, ten for the time, and two 
mee delimiters "&". 

The subroutine then examines elements of the array 
beginning with the third element (skips INTRVL and the first 
delimiter) until the second delimiter is located. The 
length of the attribute is then determined. Once the length 
1s computed the required number of character concatenations 
is determined and executed. 


The concatenation process appears to be rather 


awkward as written. It was originally implemented as a 
definite iterative DO-loop structure. For reasons unknown, 
mae loop did not concatenate the array elements, and a 


series of IF-THEN decisions were implemented in lieu of the 
GOD . Finally, the subroutine reclassifies TIME from a 
character variable to a real variable to allow comparison 
with the Push program generated timer. 


Although each time and data file is in sequential 


order, records read from each file must be compared against 
each other to ensure data is sent across the network 
chronologically. An array type of real numbers, TMARY, is 


implemented to contain a time record from each of the time 


files. An array type of integers, UTARY, is implemented to 
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contain the corresponding logical unit number of the time 
record: 

The TMARY array 1S sorted in descending order, while 
the UTARY array mirrors the required sorting interchanges. 
This enables the program to order the logical unit of the 
time file which in turn points to the correct data record in 
the appropriate data file to be read and transmitted. The 
routine IARAYS places the first record of each time file and 


its corresponding logical unit number into TMARY and UTARY 


respectively. The variable INDEX is used to indicate array 
position. When the subroutine 1s finished, INDEX is assigned 
the value 1. Contriving this eliminates the need for two 
read routines. The RDTME routine is used both to initiate 


and update MTMARY. 

After the arrays are initialized, the records are 
sorted and transmitted until all of the files are empty. 
When a file 1S empty the subroutine COMPACT is invoked to 


decrement the counter of open files, increment the counter 


of closed files, and shift elements of the arrays to the 
left 1 unit. The counter for empty files is used to 
terminate the program when the counter 1S equal to jie 
number of initially opened files. The counter for the 


remaining open files is used to provide the sort routine with 
the element comparison range and the elements in the left 
most position are no longer required because that file 1s 
empty. This increases the efficiency of the sort routine by 
eliminating unnecessary comparison. 
3. SORT Routine 

The sort routine selected for this program is a 
Slight variation of the Bubblesort and uses the time records 
from the time files as objects of its sort. AS previoueie 
stated all records within each individual file are already 
ordered, drastically reducing the number of required 
comparisons and interchanges. We found this sort routine to 


be the most efficient one to our knowledge for sorting an 
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array that is predominantly arranged in order. This 
variation of Bubblesort was contrasted with the original 
Bubblesort, Shakesort, Quicksort, and Heapsort and found to 
have the least number of comparisons and interchanges for an 
ordered array. 

The outer loop in the sort routine sets the terminal 
condition, MORE, to false and adjusts the comparison range if 
required. The inner loop is used to make the comparisons and 
interchanges. If an interchange iS not required on any 
iteration of the inner loop, the array is assumed sorted and 
the routine terminates. Upon completion of the sort routine 
the data file containing the next record for transmission 1s 
determined. 

4. CHCLK Routine 

After the correct data file has been identified it is 
then necessary to resolve when the record 1s to be read and 
transmitted. This is accomplished in subroutine CHCLK. When 
the value of the program clock is equal to the record clock 
the appropriate data record is read and sent through the 
network. If the times are not equal, the program clock is 
incremented, by 0.00001 until the times are equivalent. The 
program clock 1s compared with the time record after each 
increment. 

The purpose of the program clock is simply to cause 
a delay in transmission utilizing a counter to represent a 
break in the data stream. This delay is simply in terms of 
the relative amount of time the game player would normally 
wait until that data set would appropriately be available 
for query purposes. 

Prior to sending the data across the network, the 
data record is tagged with an identifier and delimiter in 
subroutine SNDREC. The tag permits the Pack program, on the 
Sun, to determine for which table the record destined. The 
actual data transmission is performed by utilizing the 


remote file access routine available in the FORTRAN Library 
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on the VAX=11. Following data transmission the RDTME reads 
the next time record from the corresponding time file of the 
record just transmitted into the TMARY. The process 
continues until all the records have been sent across #ene 


network. 


C. . PULL, PRGGKAM 

1. Incoming Game Files 

The Pull program runs in the background mode timesharing 
with the PACK program, also running in the background mode. 


The Pull program places data which has been sent across the 


network by the Push program into one of two data files 
located on the Sun Workstation. These two data files 
designated GAME1.DAT and GAME2.DAT are selected to be 


written or read depending on the status of the global read 
lock (RLCK) and write lock (WLCK) variables. 
2. Read Lock, Write Lock 

Prior to accepting data from the VAX-11, the Pull 
program checks the status of the global variables RLCK8 or 
RLCK9 to see if GAME1.DAT or GAME2.DAT respectively is being 
read by the Pack program. If the read lock status is equal 
to 0 the file is available to be written into by the Pull 
program. Access by the Pack program to read a filewiaee 
disabled by setting the write lock variables, WLCK8 or 
WLCKO, ‘equaleto i. The Pull program then opens the file, 
accepts data from the VAX-11, writes data to the file, 
closes the file, and resets the write lock variable back to 
O. This sequence is executed for each data set written into 
the. ff i1'ex 

The Pull program alternates writing between GAME1.DAT 
and GAME2 .DAT. The actual file that is selected to be 
written into depends on the RLCK status of the chosen file. 
This alternation of the files continues until GAME1.DAT is 
closed by the Push program. This closure signals the Pia 
program that there is no more data to be received at its 
end. The Pull program sets NOMO to TRUE, informing the Pack 
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program that no more data are to be read while in the 
REPEAT-UNTIL loop. 


Dy, THE PACK PROGRAM 
1. Implementation 

The Pack program initially attempts to read file 
GAME1.DAT and busy wait until WLCK8 is set to 0. Because 
WLCK8 is Miler zedeto 1 Srneethne §Pull program, the Pack 
program will not access GAME1.DAT until at least one set of 
data is available to be read. Once access to GAME1.DAT is 
obtained by the Pack program, the RLCK8 variable is set to 
i. This action denies access to GAME1.DAT by the Pull 
program. When all records have been processed by the Pack 
program, RLCK8 is set to 0 and access by the Pull program is 
again permitted. The Pack program will then busy wait to 
read GAME2.DAT until access is granted. 

While reading GAME2.DAT during the last iteration, 
fame Pull program could be writing for the last time into 
GAME1.DAT and set the variable NOMO to true. To read and 
process this data the Pack program will exit the 
REPEAT-UNTIL loop, open GAME1.DAT, read the stored data, and 
place the data into the proper table. When the EOF is read, 
the Pack program terminates. It 1s not necessary to perform 
this read procedure on GAME2.DAT because of the program 
Sseructure. 

2. Database Tables 

When a record has been read from either GAME1.DAT or 
GAME2.DAT, it must be parsed, reassembled into its correct 
orm , and finally placed into the appropriate JTLS table. 
The first step in this process is to extract the table 
identifier and attributes from the data record. Except the 
mereeset and last items, the individual data items. are 
delineated by the "&" delimiter on either side of the 
component. A space denotes the end of the record. The search 


for attributes continues until a space has been located, 
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which sets the loop terminal condition, MORE, false and ends 
the process. 

Each element of the character array RCD is examined 
by the program. If the character read is not a space or 
delimiter the variable LEN, used to identify the field 
length, is incremented. The next element of the array is 
then examined. If a delimiter is read, the subroutine 
CONCAN is called to concatenate the appropriate elements 
into a single character string variable ATTR. The variable 
POS is the beginning element location, and LEN determines the 
number of required concatenations. Upon return from 
subroutine CONCAN, subroutine CONVRT is called to determine 
which attribute the string represents. 

When the variable ANUM is set to 1, the variable ATTR 
represents the table identifier. The table identifier is 
subsequently used with specific values of ANUM to determine 
placement of ATTR into the database tables. The variable 
ATTR is then transformed to the appropriate data type for 
insertion into the database table. The programs returns to 
subroutine FNDATT which prepares the variables ANUM, LEN, 
INX and POS for the mext \¥sering. 

Subroutine ENTTUP writes data into the appropriate 
table. The corresponding read lock variable is tested to 
Gain controler the desired database table. If RLCK is 
equal 0, WLCK is assigned 1 to prohibit the query program 
from gaining access. The data is then written to the table, 
and WLCK is reassigned 0 to allow queries. If RLCK is equal 
to 1 the program will busy wait attempting to gain access 


until the query program sets RLCK to 0. 
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VIII. RELATIONAL DATABASE DESIGN 


A relational database design has been included to 
facilitate the implementation of the ORACLE database on the 
Sun Workstation. A logical database design specifies the 
logical £Ormia G of the database, the records 1xe) be 
maintained, their contents, and the relationships among those 
records [Ref 14]. The logical design is then transformed 
into a relational database design, which is compatible with 


ORACLE and contains detailed specifications of the data base 


structure [Ref eee For an in depth explanation on 
relational data base design, please refer to [Ref. 14], 
[Ref. 16) and [Ref. 17]. Comments on the relational data 
base design as they pertain to the Postprocessor are 


provided below. 


The JTLS Postprocessor User Guide [Ref. 4], Data 
Reguirements Manual [Ref. 13], and several sets of actual 


game data were used to construct the design. Our winitatal 
inspection of the JTLS User Guide [Ref. 18] and the game data 
revealed a number of irregularities and discrepancies. We 
did not attempt to improve or add to the tables but only to 
translate the narrative data available in the tables into a 
relational design format. 

Comments on Relational Design: 


1) Attributes are provided in the order they are produced 
by the game. During the logical design process order 
1S normally unimportant, however attributes are 

rovided in the order they are produced by the game. 

rder 1s included in this design, because it would 
have been impossible to construct the Push and Pull 
programs without it. Only after Koo) eo Nel ee ea Stem ase 
several sets of game data could this determination be 
made as no source documentation is available. 


2) There 1s a considerable amount of redundancy in the 
Postprocessor tables. Data items are included in a 
table even though they could be determined through 
some other table. The redundancy in the Postprocesso 
aaa 1S intended to speed query processing [Ref. 


41 


EX” RESULT OF “TEE LUD, 


A. INTRODUCTION 

This thesis supports the Naval Postgraduate School’s 
(NPS) interest in the study of the feasibility of improving 
the performance of JTLS by developing a method eliminating 
the POSEPEOCESSOE: We recommend the use of a dedicated 
database system running on a separate machine, physically and 
logically interfaced to the VAX-11. The intent of "tims 
project was to determine the feasibility of improving the 
performance of JTLS by eliminating the Postprocessor. To 
this end, several software products were produced. 

The NPS made available the VAX-11 complete with JTLS, 
the Sun Workstation, and the Sun microsystems’ version of 
UNIX. The Postprocessor was neither examined nor executed 
because it was never available for our use. The choice of 
these specific hardware and software components was 
discussed in detail in Chapter 1. However, the primary 
reason remains that these items continue to support a wide 
variety of possible modifications which are seriously being 
contemplated to further enhance the performance of JTLS, to 
include a distributed gaming system scenario. As such; ies 
was the goal of this thesis to define the boundaries of one 
small aspect of such a problem, and in turn develop as many 
deliverable products as possible in fulfillment of jie 


goal. 


Boo CNORS ITS 

These programs were developed to simulate the data 
transmission from the VAX and the assimilation of the 
transmitted data into a JTLS database located on the Sun. 
The £lest we proeduct produced was the Push program. This 
algorithm mimics what is anticipated to be the function of 


the modified. CEP. This modification will involve wie 
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creation of an interface between the game and the Ethernet. 
Next, a receiving algorithm had to be constructed which 
interfaced the Sun with the Ethernet. Finally, a program 
was developed which places the data into their respective 
database table. 

The tables, which are accessed by the Pack program, have 
been scrutinized for possible points of improvement within 
the constraints as outlined in Chapter 1. After closely 
reviewing the written goals detailed by the proponents of 
JTLS, we determined that the tables will be left in their 


current configuration. However, no supporting documents for 
the construction of the tables could be found anywhere. 
This required that we design and develop the Relational 


Design from the available tables. 

These database tables will need to be generated by the 
ORACLE database system. Once installed on the Sun, ORACLE 
must be initialized and configured to communicate with the 
Pack program. In this way input data will be accepted by 
ORACLE via a logical pipeline versus input generated from a 
keyboard. 

To transport the data from the game to the ORACLE 
database system, the Sun Workstation will need to be 
included in the local area network (LAN) as configured in 
the war laboratory. iaaes will necessitate that both the 
software and hardware installation take place as prescribed 
in the ORACLE technical manual. Not only is the Ethernet 
Beqaired, but also TCP/IP to permit the VAX to conduct its 


unidirectional data traffic. 


C. ACCOMPLISHMENTS AND ANALYSIS 
mee Push Program 
The Push program has been completed and partially 
tested. Because there is not an internet connection between 
the VAX-11 and the Sun Workstation at this time, we can not 
prove conclusively that the data sent by the Push program 


will be received on the Sun as we anticipate. By including 
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several debug statements throughout the program, the 
program executes the algorithm as outlined in Chapter 6. [In 
the testing phase, the program was allowed to read several of 
the game files. It then performed the necessary processing 
to the read data and wrote the results into a file called 
GAME .DAT for our review. Without error, the data records 
had been selected, sorted and entered into the file in the 
correct time sequence. When more than one record had the 
same time stamp, the program took the first available record 
of that sequence and placed it into GAME.DAT. After 
fourteen different runs, the file GAME.DAT contained the 
exact same results. 
Zo (eu IE SoG ram 

The network interface aspects of the Pull program 
could snot be tested, again because of the lack of the 
network facilities for themesun- Though the program 
interacted correctly with the Pack program, no determination 
was made concerning its ability to interface with either the 
data generated by the Push program or the Ethernet. 

Inconclusive testing of the Pull program was 
conducted by having the program read a static file titled 
GAME.DAT which resided on the Sun Workstation. Running in 
the background mode, the Pull program simulated data 
acceptance from the Push Progicame No artificial 
restrictions were imposed on how the Pull program read this 
file. The algorithm specified that it could read only one 
data item at a time, and must write that item into either 
GAME1.DAT or GAME2.DAT depending on the status of the 
respective RLCK. By manually setting RLCK of the respective 
files to 1 or 0, we were able to test whether the Pull 
program would respond correctly. Without error, the Fam 
program placed each data item into the correct file after 
determining that the other file RLCK had been set to l. 

To test the programs as exhaustively as possible, 


several boundary caseS were also examined. Because of the 
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construction of the algorithm, when both files were set to 
1, it had no impact on the program. Since the program 
alternates writing to each file, it simply entered a busy 
wait state until the file it is walting to write into is 
available. The program will not check the status of the 
other file until it has completed its write requirement to 
the first file. When both files have RLCK equal to 0O, it 
again has no impact on the program. The Pull program will 
continue to write in the same file until a query access 
changes that RLCK from 0 to l. 
mee fack Pro@igam 

The Pack program and its interaction with the Pull 
program was extensively tested utilizing the two files 
GAME1.DAT and GAMEZ2.DAT. The Pull program was run in the 
background mode and the Pack program in the foreground mode. 
No testing of the interface between the Pack program and 
ORACLE was possible at this time. 

Though we are unable to verify the correctness of the 
compatibility of the Pack program with ORACLE, the results of 
the test involving the Pull program lends’ substantial 
Seedibility to the performance of the Pack program as 
outlined in Chapter 6. 

Once the Pull program deposits its data into either 
GAME1.DAT or GAME2.DAT, the Pack program will be able to 
retrieve the data in the order the Push program sent them 
across the network. By running the Pack program in the 
foreground mode, we were able, with the aid of debug 
write-lines, to observe the program read each data entry and 
place the processed data into its proper attribute location. 
Because there was no database system to generate the 
initially empty tables, we are unable to prove beyond doubt 
if the format of the files are compatible with ORACLE. 
However, the ATTR data string was successfully parsed and 
each attribute item was received at its designated 


destination during testing. 
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Several boundary cases were examined to include 
1) both files having their WICKS ceaeen 
2) both files having their RUCK sepurome, 
3) both files starting empty and finally, 


4) the Pack program reading the last data item 
supplied by the Pull progam: 


All of these cases were handled without difficulty by the 
Pack program. If a string did not conform to the formate 
anticipated in the algorithm, the program has been designed 
to discard thats strung, 

Concurrency control closely resembles the mutual 


exclusion problems which were a major area of research a few 


years ago [Ref. 17]. However, these two methods of time 
control differ in very subtle ways. In mutual exclusion we 
approach the problem from the program side, establishing 


critical sections and making sure no two critical sections 
are active at the same time. In concurrency control we make 
use of the lock variables RLCK and WLCK, approaching the 
problem from the data side, directly protecting each file, 
without regard to which piece of the program tex is 
currently executing. When there are potentially many 
programs, such as Pull and Pack, that might access some of 
the same files, it makes more sense to put the access 
controls on the files, rather than in the programs. The 
implementation of the locks is also different because keeping 
a semaphore for each file on the file system for the 
unlikely event that someone might want to lock it WSiigee 
expensive. 

Automatic locking is often combined with” atoms 
update in a form known as a transaction. In our algorithm 


the form of the transaction has been slightly modified, but 


the principle is the same. By definition a completed 
transaction includes’ the property of either running 
successfully to completion, or Haadamag and leaving the 
system state unchanged. To run a tfansacereny one of the 


program locks the file that it is to use and blocks the 
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other process from access. It can then read and write to 
that file. Before it is finished and the process releases 
the lock on the file, the process ensures that all changes 
have been permanently made to the file in a single atomic 
update. Until the changes are completed, no other process 1s 
able to see or access the file. 
4. Relational Design 

The JTLS tables described in the Postprocessor 
contained very little information on attribute order. A 
lengthy analysis and comparison of every CEP produced file, 
the E@seprocessor — User | Guide [Ref. 4] eleiol ele DeVecl 
Requirements Manual [Ref. 13] were necessary for the 


development of the Relational Database Design located in 
Espoendix J. This process was extremely tedious and time 
consuming, but vital for the creation of the JTLS tables in 
the ORACLE DBMS and for the processing of the data through 
the Pack program. The Relational Database Design will save 
a substantial amount of time and effort in the continuation 


Seethis project. 


D:. PROJECTED IMPACT ON JTLS 

As mentioned earlier, JTLS 1s a valid simulation 
offering a host of advantages usually outlined in literature 
such are [Ref. 1,2,3) over training exercises and actual 
combat. As with: most things, minor improvements in 
appropriate areas may enhance the benefits of playing JTLS. 

One such improvement is the implementation of a 
dedicated database management system which will = run 
concurrently with the game. Although actual real-time 
analysis of gaming data by a sequentially executed program 
1s virtually impossible [Ref. 17], getting as close as 
possible is the aim of this project. 

The completion of the Relational Model allows for a more 
thorough analysis of all the database table requirements 
pertinent to this game. The developers of the Postprocessor 


have claimed that extensive attribute redundancy was a 
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necessity to accommodate rapid  dataueeer rie ae With the 
addition of the ORACLE DBMS, this statement may need to be 

re-examined. This later version of the database system 
contains many dramatic improvements over the 1970’s era 
DBMS’ in the realm of speed and efficiency [Ref. 19]. 

The ultimate impact of this project on the future of 
JTLS is almost unlimited. Currently only a single central 
computer system 1S able to execute the game with several 
dummy terminals available for the players to enter their 
input. With the success of the LAN and the incorporation of 
a concurrently running data analysis capability, this system 
1s placed one step closer to a truly distributed war game 
with major force component players dispersed over many 
miles. 

To to keep this project within reasonable bounds, the 
proposal suggested the possibility of internetting only one 
Sun Workstation and a demonstration was to take place 
implementing this arrangement. However, it 1S obvious that 
a minimum of two such stations would need to be in placewias 
query activity to take place for both sides of a two-sided 
Combat situacion- The number of Sun Workstations need not 
be restricted to the number of opponents, but rather to the 
number of MIPS involved in any Single game. Then each 
player would have a dedicated source of informationwiee 


Support his decisions. 


aye CONCLUSION 

If it can be assumed that the developed programs 
Satisfy their performance requirements, then it is possible 
to make several conclusions about the outcome of this 


feasibility teste: 


1) It is possible to use a dedicated processor for 
off-line retrieval of data from an operational system. 

2) The inclusion of a Sun Workstation into, the Ethernet 
will allow very close to real-time retrieval of 
pertinent data, in response to user SOL quecrice: 


48 


FEF. RECOMMENDATION 

After close review of the completed products of this 
thesis, in conjunction with several conversations with those 
parties interested in JTLS, we recommend that a final 
attempt be made to actually internet Sun Workstations to the 
Ethernet for the exchange of game data. This is one part of 
the proposal that was not completed in terms of the actual 
conveyance of data from one computer system to another. 
Once the data is made available on the Sun, the ORACLE 
Technical Manual discusses the procedure to assimilate data 
received from a communications channel into the respective 


tables. 


G. AREAS FOR FURTHER STUDY 

Essentially there remain only two major areas of 
additional research required to complete this project within 
the scope and constraints outlined in this proposal. These 
include: 


mmewtis CODE MODIFICATION - For us, the SIMSCRIPT code 
for JTLS was not made available for review. 
Picnougieand indepth study wneuld be made on the 
PuacCeaecality and the cost-benefits of modifying the 
algorithm to make it network compatible. melee alan elrg 
attention needs to be placed on that part of the code 
that involves the interface of the CEP to the Ethernet. 


2) MENU DRIVEN QUERY - It 1s recommended that the menu 
driven interface be translated directly from the _. 
BIGEEorbased language to SOL*C. Though not difficult 
to implement, it 1S anticipated to be considerably 
large in scope. The menu driven queries appears well 
Suited for command and control queries, Eonaiiiy this 
will preclude the user from unnecessarily learning 
another aspect of an environment he may already 
consider hostile and unfriendly. 

In conclusion, as a result of the comprehensive analysis 
of the problem and the development of the software programs 
and database designs, we are confident that the goal of this 
project 1s attainable. Those areas recommended for further 
actions should be pursued. We believe that the continuation 


of this project will produce the desired result. 
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APPENDIX A 
PROGRAM FILES 


ACAVAIL.DAT: JTLS file containing records on the number 
of aircraft available for launch 


ACAVAIL.SQL: Actual ORACLE database containing the data 
from ACAVAIL.DAT. Data 1S written to this file in the 
PACK prodmam: 


ACAVTM.DAT: Created by the PUSH program. Contains the 
TIME attribute of the records from ACAVAIL.DAT. 


ACKILLED.DAT: JTLS file containing records of the number 
Of alrcratt _kitied: 


ACKILLED.SQL: Actual ORACLE database containing the data 
from ACKILLED.DAT. Data 1S written to this file ingens 
PACK. Progzaam. 


ACKLLTM.DAT: Created by the PUSH program. Contains the 
TIME attribute of the records from ACKILLED.DAT 


ACLAUNCH.DAT: JTLS file containing records of the number 
of aircraft launched on missions. 


ACLAUNCH.SQL: Actual ORACLE database containing the data 
from ACLAUNCH.DAT. Data 18S written to this file in the 
PACKS pregnam. 


ACLAUTM.DAT: Created by the PUSH program. Contains the 
TIME attribute of the records from ACLAUNCH.DAT. 


ACREM.DAT: JTLS file containing records on the number of 
Al SeEare One wand: 


ACREM.SQL: Actual ORACLE database containing, the data 
from ACREM.DAT. Data 18 written to this file in thee ee 
program. 


ACRETM.DAT: Created by the PUSH program. Contains the 
TIME attribute of the records £rom ACREMeDAw 


GAME.DAT: Created by the PUSH program. This file 1s used 
to push data across the network. Created and writtenmee 
in the PUSH program and read from in the PULL program. 


GAME1.DAT & GAME2.DAT: Created by, the PULL program. Data 
read from the PULL program 1S written to these files to 
be read by the PACK program. Two files are required to 
enable the PACK program fo access data without 

2 with the transmission of data across the 
network. 
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APPENDIX B 
PUSH PROGRAM VARIABLES 


CLKINC (CLOCK INCREMENT) 


CTME 


description: Real constant containing the value 
(".000001") to increment the simulated game clock. 


utilization: Increments simulated game clock in 
subroutine CHCLK. 


(CHARACTER TIME) 


description; Character variable containing the 
characters in the time attribute of data records. 


utilization: Assigned the characters value of the time 
feealoleest Ne Subroucine GETIME. 


CUNIT (CHARACTER UNIT) 


description: Character variable containing the | 
Character representation of the logical unit assigned 
to a data file on the Sun Workstation. 


utilization: Determined and attached to the data 

record subroutine SNDREC. The value of CUNIT is. used by 
the aaa program to determine which table to write 
record. 


DELIM (DELIMITER) 


description: Character constant containing the value 
os Attribute in JTLS records are separated by the 
ampersand. 


MELlization: 


1) Determines when the last character of the time 
attribute has been located in subroutine GETIME. 


2) Attached to the data record and sent across the 
network in subroutine SNDREC. 


Pedies (EMPTY FILES) 


FILES 


description; Integer variable that contains the number 
oe closed files. 


utilization: (COMMON /BLK1/) 


Ae Determines terminal condition in MAIN program. 
When EFILES equals FILES program execution terminates. 


2) Incremented in subroutine COMPACT. 


description: Integer constant containing the number of 
JTLS input files used in this program. 


utilization: Used to initialize OFILES in main 
program. 


Sil 


GMCLK (GAME CLOCK) 


INDEX 


INFO 


ITEMP 


BES ENS Get variable simulating the JTLS game 
ime. 


utilization: (COMMON /BLK2/)Determines when data is 
sent in subroutine SND. 


description: Integer variable containing the value of 
the index/position of the array TMARY. 


utilization: (COMMON /BLK3/) 


1) Increments the position of the arrays TMARY 
and UTARY during initialization in subroutine IARAYS. 


Zh Indicates what position of the array TMARY to 
place data in subroutine RDTME. 


description: Character variable containing the 
characters of the file identifier and the data record. 


utilization: Created and sent across the network in 
subroutine SNDREC. 
(INTEGER TEMPORARY ) 


Se Se OU Integer variable containing the value of 
an UTARY array element. 


uE11IzZaGion: Used as Femporary storage for the elements 
of array UTARY in subroutine SORT. 


LENGTH 


description; Integer variable containing the number of 
characters ina time attribute. 


utilizations: Determines the number of character 
concatenations required in subroutine GETIME. 


MAXPOS (MAXIMUM POSITION) 


description: Integer constant containing the maximum 
number of characters in a record ("13") required to 
extract the time attribute. 


utilization; Test if time attribute has too many 
characters in subroutine GETIME. 


MINLEN (MINIMUM LENGTH) 


MORE 


description: Integer constant containing, the minimum 
number of characters required ("2") in a time 
ee Eee Ui & 


utilization: Test if time attribute has enough 
characters in subroutine GETIME. 


description: Logical variable. 


UG zacVen: 


Se 


1) Terminates string comparison in subroutine GETIME. 
2)Terminates sort in subroutine SORT. 


3) Terminates clock increment in subroutine CKCLK. 


OFILES (OPEN FILES) 


description: ass variable containing the number of 
data/time files that are open. 


utilization: (COMMON /BLK4/) 


1) Determines if sorting is required in MAIN program 
(Sorting 1S unnecessary, if one file 1s Se - 


2) Provides subroutine SORT with the number of 
elements, of the array TMARY, to be compared. 


3) Decremented in subroutine COMPACT. 


Eoolt (POSITION) 


description: REIS variable BOE the value 
of the index of the character array STRING. 


utilization: Positions the index for character outa y 
STRING, to, determine the length of the time attribute 
in subroutine GETIME. 


RECORD 


RTEMP 


RTME 


description: Character variable containing the 
Characters of a data file record. 


utilization: Assigned the characters of the data 
record and attached to a file identifier in subroutine 
SNDREC. 

(REAL TEMPORARY ) 


description: Real variable containing the value of a 
TMARY array element. 


utilization: Used as tem Peay storage for the elements 
of array TMARY in subroutine SORT. 


(REAL TIME) 


description: Real variable containing the time 
attribute of a data record in decimal days. 


utilization: Decoded from the character variable CTME 
and written to a time file in subroutine GETIME. 


STRING 


description: Character array containing the first 
thirteen characters of a data record. 


utilization: The first thirteen characters of a data 
record are read into STRING. This enables the 
extraction of the time attribute in subroutine GETIME. 


SRTPOS (START POSITION) 


description: Integer constant containing the starting 
position ("3") of the characters in the time attribute 
of JTLS data records. 
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utilization: Initializes POSIT in subroutine GETIME, 
TMARY (TIME ARRAY) 


description: Real ca rea contains a record from 
each of the open time fil 


utilization: (COMMON /BLK7/) 


1) TMARY (INDEX) is_assigned the value of the 
appropriate time file in subroutine RDTME. 


2) Elements are Cone ee and Beata NOS alist 
necessary in subroutine SORT 


3) The first element of array TMARY (the time to 
send the next record) is compared with GMCLK to 
Bete aie when the record will be sent in subroutine 


4) Adjusted ay 
Subroutine COMPA 


UNT (UNIT) 


ayers) all elements to theleft in 


description: Integer variable containing the value of 
the logical units of the data or time files. 


utilization: (COMMON /BLK6/) 


1) Used as counter in subroutine IFILES for creating 
time files. 


2) The value of the logical data file unit to be read 
in subroutine GETIME. 


3) Determines the value ("UNT+1") of the logical 
time file unit in subroutine GETIME. 


4) Used as counter in subroutine IARAYS for 
initiating the arrays TMARY and UTARY. 


5) Contains the value of the logical time file 
unit read in subroutine RDTME. 


6) Contains the value of the logical time file 
unit to be closed in subroutine COMPACT. 


De es ned the value of the array UTARY element 
DE 1rst array element) in MAIN program. 


8) Determines the value ("UNT-1") of the logical 

data file unit of the data record to be rea 

and sent across the network in subroutine SNDREC. 
UTARY (UNIT ARRAY) 


description: Integer array containing the values of 
logical time files unit numbers. 


utilization: (COMMON /BLK7/) 
1) Initialized in subroutine IARAYS. 


2) The elements are interchan a as TMARY elements are 
interchanged in subroutine SOR 


3) Adjusted py eh oe all elements to the left in 


subroutine COMPACT (The value in the first element is 
the unit being close 
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APPENDIX C 
PROGRAM PUSH CODE 


PROGRAM PUSH 
INTEGER EFILES, FILES, INDEX, OFILES, UNT, UTARY (45) 
REAL GMCLK, TMARY (45) 
COMMON /BLK1/EFILES, (BLK? / GMCLK /BUK3 / INDEX, /BLK4/OFILES 
COMMON fedee GHnee /BLK6/UNT, /BLK7 RY 
DATA EFILES, FILES, GMCLK, INDEX, Sr aa 4,0.0,1,45*0.0/ 
OFILES=FILES 
CALL IFILES 
CALL IARAYS 
INDEX=1 
PRINT*, ‘SORTING AND SENDING DATA‘ 
DO WHILE (EFILES.NE.FILES 
IF (OFILES GT. 1) CALL SORT 
UNT=UTARY (INDEX) 
CALL CHCLK 
CALL RDTME 
END DO 
CLOSE UNIT=7 
CLOSE UNIT=10 
CLOSE UNIT=12 
CLOSE UNIT=14 
CLOSE UNIT=16 
PRINT*, ‘PROGRAM COMPLETED’ 


END 
RRR KKK KEK KKK KK KKK KEK KEK KKK KKK KKK KK KKK KKK KKK KKK KKK KK KKK KKK KEKE 
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SUBROUTINE IFILES 

INTEGER UNT 

COMMON /BLK6/UNT 

PRINT*, ’ OPENING FILES! 

OPEN (UNIT=7, FILE=’ GAME. DAT’ , STATUS=' NEW’ 
OPEN (UNIT= 1b: FILE=' ACAVAIL. DAT, STATUS=OL e) 


OPEN (UNIT=11, FILE=’ ACAVTM. DAT’ , STATUS=’ NEW 
OPEN (UNIT=12, FILE=’ ACKILLED.DAT, STATUS=OLD’ 
OPEN (UNIT=13, FILE=’ ACKLLTM. DAT’ , STATUS=' NEW 
OPEN (UNIT=14, FILE=’ ACLAUNCH .DAT, STATUS=OLD’ ) 
OPEN (UNIT=15, FILE=’ ACLAUTM. DAT’ , STATUS=' NEW’ ) 
OPEN (UNIT=16, FILE=’ ACREM. DAT, STATUS=OLD’ ) 


UN 
OPEN (UNIT=17, FILE=’ ACRETM. DAT’ , STATUS= NEW’ ) 
PRIN CREATING TIME FILES’ 
DO 10 (ogee =10 

CALL seh 

REWIND UNT 

REWIND (UNT+1) 
CONTINUE 
PRINT*, FINISH CREATING TIME FILES’ 
RETURN. 


END 
RRR KEK KEKE KKK KK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KKK KE KEKE KEK 
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SUBROUTINE GETIME 
INTEGER LENGTH, MAXPOS, MINLEN, POSIT, SRTPOS, UNT 
REAL RTME 

CHARACTER*10 CTME, DELIM*1, STRING (13) *1 

LOGICAL MORE 

COMMON /BLK6/UNT 

DATA DELIM, MAXPOS jee SREPOs,  &’, 13,2, 3/ 
READ (UNT 100, END=103, ERR=102) STRING (I), I=1, MAXPOS 
FORMAT (13A1 

Oe eae 

POSIT=SRTPOS 

LENGTH=0 


51S, 


DO WHILE (MORE) 
IF (STRING (POSIT) .EQ.DELIM) THEN 
MORE=.FALSE. 


ELSE 
IF (LENGTH.BQ.MAXPOS .AND.STRING (POSIT) .NE 
1 DELIM) THEN 
PRINT* , "TIME IS GREATER THAN F10.6 
it FORMAT" 
GO TO 103 
ENDIF 
LENGTH=LENGTH+t+1 
POS PiR-POs] law 
ENDIF 
END DO 
IF (LENGTH. LT.MINLEN) THEN 
PRINT*, *TIME IS ONLY ONE CHARACTER" 


Gor toOudos 

ENDIF 

IF (LENGTH.EQ.2) CTME=STRING(3)//STRING (4 

IF (LENGTH. EQ. 3) CTME=STRING (3) //STRING (4 j SE RINey 5 
we TRING (6) ~ 4) CTME=STRING (3) //STRING (4 (yo RRTMEN 5 
TE (LENGTH E .5) CTME= STRING (3) //STRING QS lacee 
1//STRING (6) /S RING 

TE LENGTH. EQ. SPRING ( “STRING (3) // Bh we ¢4y 7foee 
is TRING (6) /s RI //STR 8) 

IF ( we Meee y STRING ( /STRING(5) 
17/STRING (8) /STRING (7) //STRI (8) /7STREN G43) 

JE (LENGTH EQ. 8) CT E~STRING (3) / STRING (4) //STRIN zt 
1//STRING(6)//S RING (7) //STRI (8) /7STRIA Gee Se TRE G(10) 
LF (LENGTH EQ. 3) cD E“STRING (3) / STRING (4) //STRIN 
1//STRING(6)//S RING (7) //STRI 68) 7 SeRIN G (9) 
1//STRING (i y; SSTRING (12) 

1 eee . 10) CTME=STRING (3) //STRING (4) //STRING (5) 
1//STRING (6 (/ STRING (7) //STRING (8) //STRIN G(9) 
1//STRING (10) //STRING (11) //STRING (12) 

DECODE (LENGTH, 101, CTME) RTME 

WRITE ((UNT+1),101)RTME 

101 FORMAT (F10 
GO TO 10 


O 
ee mB peesew 2 OOS IN READING DATA FILES SUBROUTINE GETIME 
103. RETURN 


END 
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SUBROUTINE IARAYS 
INTEGER INDEX, UNT UTARY (4 5) 

COMMON /BLK3/INDEX, /BLK6/UNT, /BLK7/UTARY 
DO 10 UNT=11 17,2 


CE ee ae 
INDEX=INDEX+1 
10 CONTINUE 
RETURN 


END 
KK KK KK KK KKK KK KK KKK KK KK KKK KKK KKK KK KKK KKK KKKKKKK KAKA KKK KKK 


SUBROUTINE RDTME 
INTEGER INDEX, UNT 
REAL TMARY (45) 
COMMON /BLK3/ INDEX, /BLK5/TMARY, /BLK6/UNT 
READ (UNT, 100, END=101, ERR=102) TMARY (INDEX) 
100 FORMAT (F10. 65 
RETUR 
101.6 1Camm COMPACT 
RETURN 
102 _PRINT*,"ERROR READING TIME FILES IN SUBROUTINE RDTME 


END 
KKK KKK KK KKK KKK KK KKK KKK KK KKK KKK KKK KK KKKKK KK KKK KKK KKK RK KKK RK KK 


96 


SUBROUTINE COMPACT 
INTEGER RY (ae) OFILES, UNT, UTARY (45) 


REAL TMAR 5). 
COMMON BLKI/é ILES, /BLK4/OFILES, /BLK5/TMARY, /BLK6/UNT, 
1/BLK7/UTARY 
J=OFILES-1 
IF (OFILES. GT. 1) THEN 
DO 10 
THARY {1 ) = TMARY Ti 
UTARY (I) =UTARY (I+1 
10 CONTINUE 

ENDIF 


EF ILES=EFILES+1 

OF LEbEo— aa ui 

CLOSE UNIT= UN 

UNE, (7 CLOSED UNIT’ , UNT) 
RETURN 


END 
KKK KKK KKK KK KK KKK RK KKK KK KK KKK RK KK KK KR KKK KR KK KR KK KR KK KK RK KK KK 


SUBROUTINE SORT 
INTEGER OFILES LTEMP UTARY (45) 
REAL RTEMP TMARY ( 


LOGICAL MO 
COMMON /BLK4 /OFILES, /BLK5/TMARY, /BLK7/UTARY 
J=OFILES-1 
MORE= TRUE 
DO 10 I=1 
IF (. hor. MORE) RETURN 
K=OFILES-I 
MORE=. FALSE. 
DO 20 L= 
IF (THARY (L) ST ,TMARY (L+1) ) THEN 
RTEMP= TMABY (L) 
TMARY (L) =TMARY eal 
(L+1) =RTEMP 
ITEMP=UTAR () 
UTARY Py CUTAR (L+1) 
UTARY (L+1) =I TEMP 
ENDIF 
20 CONTINUE 
10 CONTINUE 
RETURN 


END 
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SUBROUTINE CHCLK 
INTEGER INDEX 
REAL CLKINC, GMCLK, TMARY (45) 
LOGICAL MORE 
COMMON /BLK2/GMCLK, /BLK3/INDEX, /BLK5/TMARY 
DATA CLKINC /.000001/ 
MORE=.FALSE 
DO WHILE(.NOT. RE) 
TE (tMARY (INDE ) 2B. GMCLK) THEN 


CALL SNDR 
MORE=. TRUES 
ELSE 
GMCLK=GMCLK+CLKINC 
ENDIF 
END DO 
RETURN 


END 
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SUBROUTINE SNDREC 
INTEGER UNT 

CHARACTER*1 DELIM 

CHARACTER CUNTTA2 INFO*80, RECORD*77 
COMMON /BLK6/UN 

DATA DELIM /* & ow 


Se), 


Phe 
elele 
WN 








TE(UNT EO Vt) CUNT it — ee 
TE (UNT. EQ, 13) Cun ii = aan. 
TF (UNT.EO.75) CUNT o—" iz) 
IF (UNT. EO: 17) @UNI T= ea 
READ ( (UNT-1) , 101, END=103, ERR=104) RECORD 
FORMAT (A77) 
INFO=CUNIT//DELIM//RECORD 
WRITE (7, 102) ot 
) 


FORMAT (X,A80 
RETURN 
PRINT*, "ERROR READING DATA FILE IN SUBROUTINE SNDREC 
LLINE of 

RETURN 

END 
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APPENDIX D 
PROGRAM PUSH CODE DESCRIPTION 
PROGRAM PUSH 
INTEGER EFILES, FILES, INDEX, OFILES, UNT, UTARY (45) 


REAL GMCLK, TMARY (45) 
COMMON /BLK1/EFILES, /BLK2/GMCLK, /BLK3/ INDEX, /BLK4/OFILES 


COMMON /BLK5/TMARY, /BLK6/UNT, /BLK7/UTARY 
Initialization of variables. 


DATA EFILES, FILES, GMCLK, INDEX, UTARY /0,4,0.0,1,45*0.0/ 
OFILES=FILES 


Open data files and create time files. 
CALL IFILES 
Initialize arrays TMARY and UTARY 
CALL IARAYS 
Assign INDEX the value of "1". All subsequent reads of time 
files will be placed into the first element of array 
TMARY. See subroutine RDTME. 
INDEX=1 
End Initialization. 
PRINT*, ’SORTING AND SENDING DATA’ 
Send_ records while data files are open. Terminate process 
1f all data files are closed (The number of empty files 1s 
equal to the number of data files used). 
DO WHILE (EFILES.NE.FILES) 


Call subroutine SORT if there is more than one file open. 
Sorting 1s not required if only one file 18S open. 


IF (OFILES.GT.1)CALL SORT 
oo the value of the first element of array UTARY to 
The logical unit of the next record to be transmitted is 
"UNT-1". The logical unit of the next time file to be reads 
is the value "UNT". 

UNT=UTARY (INDEX) 
Determine when data should be sent. 

CALL CHCLK 
Get the next time file record. 

CALL RDTME 


END DO 
Close files. 


CLOSE UNIT=7 

CLOSE UNIT=10 
CLOSE UNIT=12 
CLOSE UNIT=14 
CLOSE UNIT=16 


a2 


PRINT*, ‘PROGRAM COMPLETED’ 
SLOE 


END 
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SUBROUTINE IFILES 


This subroutine opens data and time files. Logical 
assignments begin with number 10. The data files are 
assigned even units, and the time files are assigned a 
unit 1 higher of it"’s respective data file (the odd 
numbered units). The routine then call subroutine GETIME 
to create time files on the appropriate units. 


INTEGER UNT 
COMMON /BLK6/UNT 
PRINT*, ‘OPENING FILES’ 


QgaQgaqgaggaANA 


Open files and assign logical units. 
"GAME .DAT" is used to transmit data across the network. 


OPEN (UNIT=7, FILE=’ GAME. DAT’ , STATUS=’ NEW’ ) 
OPEN (UNIT FILE=’ ACAVAIL.DAT, STATUS=OLD’ ) 
OPEN (UNI FILE=’ ACAVTM. DAT’ . STATUS=" NEW 
OPEN (UNI FILE=’ ACKILLED. DAT, STATUS=OLD’ 
OPEN (UNI FILE=’ ACKLLTM. DAT’ , STATUS=’ NEW’ ) 
OPEN (UNI FILE=’ ACLAUNCH . DAT, STATUS=OLD’ 
EF 


00:00 


OPEN (UNI ILE=’ ACLAUTM. DAT’ STATUSE’ NEW ) 
OPEN (UNI ILE=’ ACREM. DAT STATUS=QLD’ ) 
OPEN (UNIT FILE=’ACRETM.DAT’ , STATUS=’ NEW’ ) 
PRINT*, CREATING TIME FILES’ 


ee ae oe Dae Lae 


7 
16 
LT. 
12 
13 
14 
15 
16 
17 


~ = % % 32 3 3% SF 


This loop is for creating time files. The loop control 
variable "UNT" determines the data and time files to be 
read and written. Files are rewound for subsequent 
processing. 


On 0 OO 


DO 10 UNT=10,16,2 
CALL GETIME 
REWIND UNT 
REWIND (UNT+1) 
10 CONTINUE 
PRINT*, “FINISH CREATING TIME FILES’ 
RETURN 


Kk aK KKK KK KK kk Kh kkk kK KKK KK KKK KKK KKK KKK KKK KKK KKK KK KKK KKK KKK KKK KK 
SUBROUTINE GETIME 

This routine extracts, and converts, the characters of the 

time attribute to real format and writes them to a time 

file. 

Data analysis showed: 


1) the third character of JTLS records 4s thegevree 
Character of the time attribute (SRTPOS). 


2) the minimum number of characters in the time 
attribute 1s two (MINLEN). 


el) pie maximun number of characters in a time attribute 
is : 

4) Attributes in JTLS records are separated by the 
delimiter "&"(DELIM). 


INTEGER LENGTH, MAXPOS, MINLEN, POSIT, SRTPOS, UNT 
REAL RTME 


QOQoddNdnddO 00 000000000 
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it 
0 


qqQq anaagn 


QgaQang aqaQqagQ Q0Q0Q0Q 


oReRenenene) 


CHARACTER*10 CTME, DELIM*1, STRING (13) *1 
LOGICAL MORE 

COMMON /BLK6/UN 

DATA DELIM, MAXPOS, MINLEN, SRTPOS/’ &'’ ,13,2,3/ 


Read the first thirteen characters of a record into the 
character array STRING. The subroutine will return when an 
end of file is read. 


0 READ (UNT 100, END=103, ERR=102) STRING (I) , I=1,MAXPOS 
0 FORMAT (13A1 

Hones tne 

POSIT=SRTPOS 

LENGTH=0 


Determine the number of characters in the time attribute. 
When the delimiter "&" has been read the number of 
characters in the time attribute is determined. 
DO WHILE (MORE) 
Check string position for delimiter. 
ene Corr) .EQ.DELIM) THEN 


ALS 
ELSE 


Check for error. If the thirteenth position is checked and 
it is not the delimiter an error message will be provided. 
IF (LENGTH.EQ.MAXPOS.AND.STRING (POSIT) .NE. 
1 DELIM) THEN 
RINT* , “TIME IS GREATER THAN F10.6 
FORMAT" 
GOTO 103 
ENDIF 


Increment length and string position. 


LENGTH=LENGTH+1 
POSIT=POSIT+1 
ENDIF 
END DO 


If moo is less than two characters an error message will 
resu 


IF (LENGTH.LT.MINLEN) THEN 
PRINT*,"TIME IS ONLY ONE CHARACTER" 
GOLTO 103 

ENDIF 














After the number of characters in the time attribute have 
been determined, the following decision statements will 
determine 
the appropriate number of concatenations to be made. 
iz LENGTH .EQ.2) CTME=STRING Ail (BERG 
LENGTH .EQ.3) CTME=STRING (3) //STRING (4 Token ) 
ae reNNG 6) .EQ.4) CTME=STRING (3) //STRING (4 / STRING (e 


LENGTH.E CTME=STRING (3 STRING (4 STRING (5 
Feet MEET yee eae HE 


LENGTH. ) CTME= cEpDPSERRA LgpRING (8) //srRaN6 (5) 
127 TRING (6) / SPRING (7) //STRI 
fare GN TME=STRING 7) STRING (4) / / STRING (5) 
i TRING (6) is RING (7) //STRI G(8)//ST 
ee } CTME“STRING (3) / STRIN G(4 )/ STRING (5) 
We retNe ay FiBTREHGITATetR NG (8) //STRING (9) 
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IF (LENGTH.EQ. 9) CTME=STRING (3) //STRING(4)//STRING(5 
1//STRING 6) 7/ SPRING (7) //STRING (3) //STRING (9) i) 
1//STRING (1 ) // STRING (11) 

1 BRING |8)7/StRENG (7}/ /SraING (Aj pera Sy NS 
1/ STRING (10) JT ORANG (LL) TUBE NG (12) 
B. 
c Convert the time attribute from character to real, and 
Cc write it to the appropriate time file. 
Cc 
DECODE (LENGTH,101 ee 
WRITE ( ONT+1), '101)RTME 





101 FORMAT 
c 
c Control is returned to statement 10 to read the next data 
c file recor 
CG 

GO. TC ee 
Be aE "ERROR IN READING DATA FILES SUBROUTINE GETIME 
103° SRETURN 


END 
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SUBROUTINE IARAYS 


‘o 
c This subroutine is used to initialize arrays TMARY and 
c UTARY. The first time record of each time file is read 
Cc into successive elements of TMARY. The elements of array 
c UTARY contain the a ae (hel aLte. value of the corresponding 
c elements in array TMARY. , 
Cc 
INTEGER INDEX, UNT 
COMMON /BLK3/ INDEX, /BLK6/UNT 
e 
c The time files are the odd logical units beginning with 
c unit "11". The first record of each time file is’ read into 
c successive elements of array TMARY. 
Cc 


DO 10 UNT=11,17,2 
CALL RDTME 
INDEX=INDEX+1 
UTARY (INDEX) =UNT 
10 CONTINUE 
RETURN 


END 
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SUBROUTINE RDTME 


c 
C ee routine is used to read a time record into the 
C me Sacked ore element of TMARY. If an end of file is read, 
c routine COMPACT is called to adjust the arrays and 
C Bilge the empty file. 
C 
INTEGER INDEX, UNT 
REAL TMARY 45) 
COMMON /BLK3/INDEX, /BLK5/TMARY, /BLK6/UNT 
READ (UNT, 100, END= 161, ERR=102) TMARY (INDEX) 
100 FORMAT T(FL0.6$ 
RE 
Ie at eda aa « 
sh) 
102 PRINT* , "ERROR READING TIME FILES IN SUBROUTINE RDTME 
IGEN oY 
RETURN 


END 
KKK IK KKK KK IK KK KK RK RK KK RIK IO IO I IO KOK OK OK ok kk 


SUBROUTINE COMPACT 
C 


c This routine is called when a end of file indicator has 
c been read.The routine will shift elements of the arrays 
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Cc 
Cc 
Cc 
C 


QQ a 


Ga@ 


TMARY, and UTARY to the left writing over the first 
element of each array. This is done to reduce the number 
of comparisons required in the sort routine. 

DN ne poe mE LLES, UNT, UTARY (45) 


¥ (43) 
N /BLE1/EFILES /BLK4/OFILES, /BLK5/TMARY, 


COMMO 
1/BLK6/UNT, /BLK7/UTARY 
J=OFILES-1 
Adjustment is not required if one file is open. 


PE (OFT LES.GT . ae 
DO 10 I= 


WARY (1 ) <TMARY L+2} 
UTARY (1) =UTARY (I+1 
CONTINUE 


ENDIF 


Increment the number of SUEY See decrement the number 
of open files, and close the unit 


EFILES=EFILES+1 
OFILES=OFILES-1 

CLOSE UNIT=UNT 

PRINT*, (‘CLOSED UNIT’, UNT) 
RETURN 


END 
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SUBROUTINE SORT 


This routine sorts the array TMARY in descending order. 
Interchanges of elements of TMARY necessitates an 
interchange of the corresponding elements in UTARY. 


INTEGER OFILES ae UTARY (45) 

REAL RTEMP TMARY (4 

LOGICAL MO 

COMMON /BLER4 /OFILES, /BLK5/TMARY, /BLK7/UTARY 
=OFILES-1 

MORES TRUE. 


The program will return if an interchange is not required 
during any iteration of the following loop. 


DO 10 I=1 
IF (NOT .MORE) RETURN 


Adjust the number of required comparisons. 


K=OFILES- 
MORE=.FALSE. 


iS peee.. places the greatest value compared into array 
element Upon completion of this loop it is no longer 
necessary to compare position K. 


DO 20 L=1 
IF (THARY (L) ST . TMARY (L+1) ) THEN 

RTEMP= TMARY (L) 

TMARY (L) =TMARY (L+1) 

TMARY L+1) SRTEMP 
ITEMP=UTAR L) 

UTARY Ly SOTA (rn) 

UTARY (L+1) =I TEMP 


ENDIF 
20 CONTINUE 
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10 CONTINUE 
RETURN 


END 
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SUBROUTINE CHCLK 


a 
c This routine determines when to send data across the 
c network. A record will be sent when the record’s time 
S (contained in array TMARY) is equal to the simulated game 
c clock. If the record’s time is not equal to the simulated 
c clock, the clock is incremented until they are equal. 
Cc 

INTEGER INDEX 

REAL CLKINC, GMCLK, TMARY (45) 

LOGICAL MORE 

COMMON /BLK2/GMCLK, /BLK3/INDEX, /BLK5/TMARY 

DATA CLKINC /.000001/ 

MORE=.FALSE 

DO WHILE (.NOT.MORE) 
C 
c Compare record time with game clock. Send record if times 
c are equal. Increment game clock if times are not equal. 
C 


IF (TMARY (INDEX) .EQ.GMCLK) THEN 
CALL SNDREC 


MORE=.TRUE. 
ELSE 
GMCLK=GMCLK+CLKINC 
ENDIF 
END DO 
RETURN 


END 
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SUBROUTINE SNDREC 


This routine reads a data record, combines the record with 
an identifier and writes the data to the file GAME.DAT. 
GAME .DAT is read by the PULL program on the Sun 
Workstation. 


INTEGER UNT 

CHARACTER*1 DELIM 

CHARACTER cUNET Ae INFO*80, RECORD*77 
COMMON /BLK6/UNT 


Determine the table identifier to be attached to the 
record 


TE 
LE 


QagqgaqgnNaAN 


QaNaQN 


UNL 2 
ONT ee 
IF (UNT JE 
Bi) Sal Os eee a 


Read data record. 


READ ( (UNT-1) , 101, END=103, ERR=104) RECORD 
O1 FORMAT (A77) 


Attach identifier to data record. The delimiter is required 
Ee precip the identifier and the first attribute of 
the recor 


INFO=CUNIT//DELIM/ /RECORD 
WRITE (7,102) INFO 








OO O:0:0 —) 0:0 


102 FORMAT (X,A80) 
103 RETURN 
104 gRRINT*, "ERROR READING DATA FILE IN SUBROUTINE SNDREC 
L 
RETURN 
END 
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Aber tx E 
PULL & PACK PROGRAM VARIABLES 


ANUM (ATTRIBUTE NUMBER) 


ATTR 


description: Integer variable containing the number of 
attributes that have been extracted from the record. 


Herlization: 


1) Determines how attributes obtain a value in 
subroutine CONVRT. 


2) Initialized and incremented in subroutine 
FNDATT. 


(ATTRIBUTE) 


description: Character variable containing the value of 
a record S attributes. 


Wed lazation: 
1) Assigned value in subroutine CONCAN. 


2) Provides value to the actual attribute in 
Subroutine CONVRT. 


SONELT (CONFLICT) 


description: Integer variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK4/) 
1) Assigned value in subroutine CONVRT. 
Mmicitecenmee table im subroutine ENITUP. 


DEL (DELIMITER) 


INFO 


description: Charactercontaining the attribute 
delimiter "&". 


utilization: Determines when the last character of an 
attribute has been located in subroutine FNDATT. 


description: Character variable containing the 
information sent from the VAX-11. 


utilization: Read from VAX and written to a data file 
Sieene oun Workstation . 


INX (INDEX) 


description; Integer variable Comba n tng the 
index/position of the character array RCD. 


utilization: Positions the index of character array RCD 


for comparison in determining the length of an 
attribute in subroutine FNDATT. 


oe 


INTRVL (INTERVAL) 


description: Integer variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK2/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


LEN (LENGTH) 


LMSN 


MSN 


NOMO 


description: Integer variable containing the number of 
characters in an attribute. 


UE 1 Li Zaeien: 
1) Initialize and incremented in subroutine FNDATT. 


2) Determines the number of required concatenation 
in subroutine CONCAN. 


(LOSER MISSION) 


description: PE et eee containing the value of 
an actual table aftribute. 


utilization: (COMMON /BLK2/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


(MISSION) 


Gdescripei1on,:. integer Valea containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK2/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


description: Logical variable. 


utilization: Global variable shared between the Pull 
and Pack programs. 


1) Set to true in program Pull when an EOF has been 
read from GAME.DAT. 


2) Used to determine last iteration of REPEAT UNTIL 
loop 1NwFACK progam, 


NUMWPN (NUMBER OF WEAPONS) 


description: Integer variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK2/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 
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POS (POSITION) 
description: Integer variable containing the value of 
an index in character array RCD. POS is the first 
HPOsteton of an attribute. 
Mew Za one, 
1) Assigned value in subroutine FNDATT. 


2) Determines the gi tener to start concatenations 
in subroutine CONCAN. 


QUANT (QUANTITY) 


description: Integer variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK2/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


BED) (RECORD) 


description: Character sata containing the data that 
1s transmitted from the PUSH program. 


utilization: (COMMON /BLK1/) 
1) Read in main program. 


2) Examined to determine and extract attributes in 
Subroutine FNDATT. 


3) Elements are concatenated to form attribute in 
subroutine CONCAN. 


REASON 


description: epee erat able containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK2/) 

1) Assigned value in subroutine CONVRT. 

2) Written to table in subroutine ENTTUP. 
RLCK8 & RLCK9 (READ LOCK) 


ee Pet On: Integer variables containing the value 0 
one 1. 


utilization: RLCK8 and RLCK9 are global variables . 
shared between the PULL and PACK programs to coordinate 
reading and writing between the two processes. 

RLCK10 thru RLCK13 (READ LOCK) 


ea Pot On: Integer variables containing the value 0 
om 1. 

utilization: RLCK10 thru RLCK13 are global variables 
Shared between the PACK and QUERY programs to 


coordinate reading and writing between the two 
processes. 
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SHTER (SHOOTER) 


SIDE 


SMSN 


description: Character variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK4/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


description: Character variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK4/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


description: ce ee eS containing the value of 
an actual table attribute. 


WELlization: (COMMON Eirz,) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


SP (SPACE) 


TAG 


TIME 


UNIT 


description: Character constant containing the value 


utilization: Determines the end of a data record in 
subroutine FNDATT. 


description: Integer variable containing the value 
of a logical I/O unit from which record was sent. 


tT lization: 


1) Determines actual attribute assignments in 
Subroutine CONVRT. 


2) Determines the table to which a data record (tuple) 
ls entered in subroutine ENTTUP. 


description: Real variable containing the value of an 
actual stab he eater Pe uiEer 


utilization: (COMMON /BLK3/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 


description: Character variable containing the value of 
an actual table attribute. 
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utilization: (COMMON /BLK4/) 

1) Assigned value in subroutine CONVRT. 

2) Written to table in subroutine ENTTUP. 
WLCK8 & WLCK9 (WRITE LOCK) 


description: Integer variables containing the value 0 
Ox 


utilization: RLCK8 and RLCK9 are global variables | 
shared between the PULL and PACK programs to coordinate 
reading and writing between the two processes. 

WLCK10 thru WLCK13 (WRITE LOCK) 


Bee PE LON - Integer variables containing the value 0 
en L.. 


utilization: WLCK10 thru WLCK13 are global variables 
shared between the PACK and QUERY programs to 
coordinate reading and writing between the two 
processes. 

WPNTYP (WEAPON TYPE) 


description: Integer variable containing the value of 
an actual table attribute. 


utilization: (COMMON /BLK2/) 
1) Assigned value in subroutine CONVRT. 
2) Written to table in subroutine ENTTUP. 
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APPENDIX F 
PROGRAM PULL CODE 


PROGRAM PULL 
INTEGER RLCK8, RLCK9, WLCK8, WLCK9 

CHARACTER INFO*80 

LOGICAL NOMO 

DATA NOMO, WLCK8, WLCK9/ .FALSE.1,0/ 

OPEN (UNIT=7,FILE=’ GAME .DAT’ , STATUS=’ OLD’ ) 
IF (RLCK8 EQ. 0) THEN 


K8= 
OPEN (UNIT=8,FILE='GAME1.DAT’ , STATUS=’ NEW’ ) 
0 END=20) INFO 


ELSE 


ILE=' GAME2.DAT’ , STATUS=' NEW’ ) 
a 


HEP 
Za, 
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APPENDIX G 
PROGRAM PULL CODE DESCRIPTION 
PROGRAM PULL 


This Program reads data from the PUSH Seale ae on the VAX 
and writes data to either GAMElor GAME2. When the PACK 
program is reading data from GAME] data 1S written to, GAME2 
and when the PACK pace en 1s Se paar from GAME2 data 1s 
written to GAME1. This allows data fo continually be 
received from the war gene while the Sun processes data, 
and Se eae uery the database. Variables RLCK8, RLCK9 
WLCK9, and LCK9 are global variables that allow the Ewo 
processes to coordinate reading and writing. 


INTEGER RLCK8, RLCK9, WLCK8, WLCK9 

CHARACTER INFO*80 

LOGICAL NOMO 

DATA NOMO, WLCK8,WLCK9/.TRUE.,1,0/ 

OPEN (UNIT=7, FILE=’ GAME. DAT’ | STATUS=’ OLD’ ) 


If the Pack pEogean is not reading from GAME1.DAT read data 
from the PUSH program and write data on GAME1.DAT. 


lO LF (RLUCKS .EO20) THEN 


Disable pack program from reading GAME1.DAT. 


WLCK8=1 
OPEN (UN 
READ (7, 
WRITE (8 

CLOSE UN 


Enable Pack program to access GAME1.DAT. 


WLCK8=O 
ELSE 


If the Pack program is reading GAME1.DAT disable read from 
GAME2.DAT, read record and write data on GAME2.DAT. 


FILE=’ GAME1.DAT’ , STATUS=’ NEW’ ) 
Ne eY) INFO 





8 
(3 


IT= 
100 
100 
IT= 


FILE=’ GAME2.DAT’ , STATUS=’ NEW’ ) 
END=20) INFO 
INFO 





ENDIF 
GOTO 10 


When an end of file is read from the Push Program set 
global variable NOMO to false. This informs the Pack 
program the game has terminated. 


O NOMO=.TRUE. 


END 


Al 


APPENDIX H 
PROGRAM PACK CODE 


PROGRAM PACK 

INTEGER INTRVL, LMSN,MSN, NUMWPN, QUANT, REASON, SMSN, TAG, 
INTEGER WPNTYP RCLKS, RLCK9, RLCK10, RLCK11, RCLCK12, 
INTEGER RLCK13, WLCK8,WLCK9, WLCK10, WLCK11,WLCK12,WLCK13 
REAL TIME 

CHARACTER*1 RCD 89) 

CHARACTER CONFLT*20, SHTER*10, SIDE*4, UNIT*10 


COMMON /BLK1/RCD 

COMMON /BLK2/INTRVL, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN, 
& TAG, WPNTYP 

COMMON /BLK3/TIME 

COMMON /BLK4/CONFLT, SHTER, SIDE, UNIT 

COMMON © /BLK5/RLCK10, RLCK11,RLCK12, RLCK13, WLCK10, WLCK11, 
sWLCK12,WLCK1 3 

DATA RLCK8, RLCK9, WLCK10, WLCK11,WLCK12, WLCK13 

Ha Oy Soa One 


10 IF (WLCK8 .EQ.0) THEN 
RLCK8=1 
EP aot cee ena STATUS=’ OLD *) 


20 AD (8,100,END=30) (RCD (I) I=1, 80) 
CALL FNDATT 
CALL ENTTUP 
GOTO 20 
ELSE 
GOTO 10 
ENDIF 
30 CLOSE UNIT=8 
RLCK8=0 
40 IF (WLCK9.EQ.0) 
RLCK9=1 
OPEN (UNIT=9, FILE=’ GAME2.DAT’ , STATUS=’ OLD) 
50 READ (9 100, END=60) (RCD (I) I=1, 80) 
CALL FNDATT 
CALL ENTTUP 
GOTO 50 
EL 
GOTO 40 
ENDIF 
60 CLOSE UNIT=9 
RLCK9=0 


UNTIL NOMO 

OPEN (UNIT=8, FILE=’ GAME1.DAT’ , STATUS=’ OLD ‘) 
70 READ (8,100,END=80) (RCD (I) I=1, 80) 

CALL FNDATT 

CALL ENTTUP 

GOTO 70 
80 CLOSE UNIT=8 
100 FORMAT (80A1) 

STOP 


END 
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SUBROUTINE FNDATT 
INTEGER ANUM, LEN, POS, INX 
CHARACTER*1 DELIM, RCD (80), SP 
CHARACTER ATTR*20 
COMMON /BLK1/RCD 
DATA ANUM, DELIM, INX, LEN, POS, SP/1,’&',1,0,1,’ ‘'/ 
10 IF (RCD (INK) .£0 DELIM.OR- RCD (INX) -EQ. SP) THEN 
F (RCD (INX) .EQ.SP) RETURN 
CALL CONCAN (POS ATTR LEN) 
CALL CONVRT (ANUM,ATTR, LEN) 
ANUM=ANUM+1 


gL 


INX+1 
POS=INX 
LEN 


LEN+1 
INX+1 


0 


IF (INX.GT.80)PRINT*, RECORD EXCEEDS 80 CHARACTERS’ 


LEN 
INX 
INX 
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&//RCD (1118) 7/7 RED IoD 
SE ee eae 0) PRINT*, ‘ATTRIBUTE LENGTH GREATER THAN 20’ 


END 
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SUBROUTINE CONVRT (ANUM, ATTR, LEN) 

INTEGER ANUM, INTRVL, LEN, LMSN, MSN, NUMWPN, QUANT, REASON, 
& SMSN, TAG, WPNTYP 

REAL TIME 

CHARACTER ATTR*20, CONFLT*20, SHTER*10, SIDE*4, UNIT*10 
COMMON /BLK2/INTRVL, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN, 
& TAG, WPNTYP 

COMMON /BLK3/TIME 

COMMON /BLK4/CONFLT, SHTER, SIDE, UNIT 

IF (ANUM.EQ.1)DECODE (LEN, 100,ATTR) TAG 

IF (ANUM .EQ.2) DECODE (LEN, 101, ATTR) INTRVL 
IF (ANUM. EQ. 3) DECODE (LEN, 102, ATTR) TIME 

IF (ANUM.EQ.4)SIDE=ATTR 

IF (ANUM.EQ.5.AND. (TAG.EQ.10.OR.TAG.EQ.16) ) 

ATTR) QUANT 








& DECODE (LEN, 101 
IF (ANUM.EQ.5.AND.TAG.EQ.12) CONFLT=ATTR 
IF (ANUM.EQ.5.AND.TAG.EQ.14)DECODE (LEN, 100, ATTR) MSN 
IF (ANUM.EQ.6 DECODE (LE , 10 ATTR) QUANT 
IF (ANUM.EQ.7)DECODE (LEN, 100, ATTR) LMSN 
IF (ANUM.EQ.8) SHTER=ATTR 
IF (ANUM.EQ.9 DECODE (LEN 100, ATTR) SMSN 
IF (ANUM.EQ.10) DECODE (LEN, 103, ATTR) WPNTYP 
IF (ANUM.EQ.11)DECODE (LEN, 101, ATTR) NUMWPN 
TE {ANUM. EQ. 12 DECODE (LEN, 104, ATTR) REASON 
IF (ANUM.GT.13)PRINT*, ‘NUMBER OF ATTRIBUTES EXCEEDS 12’ 
100 FORMAT (I2 
101 FORMAT(IS 
102 FORMAT (F10.6) 
103 FORMAT 14) 
104 FORMAT (I3 
RETURN 


END 
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SUBROUTINE ENTTUP 
INTEGER INTRVL, LEN, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN, 
&TAG,WPNTYP RLCK10, RLCK11, RLCK12, RLCK13,WLCK10,WLCK11, 
&WLCK12,WLCK13 

REAL TIME 

CHARACTER CONFLT*20, SHTER*10, SIDE*4, UNIT*10 

COMMON /BLK2/INTRVL, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN, 
&TAG, WPNTYP 

COMMON /BLK3/TIME 

COMMON /BLK4/CONFLT, SHTER, SIDE, UNIT 

COMMON  /BLK5/RLCK10, RLCK11, RLCK12, RLCK13, WLCK10, WLCK11, 
&WLCK12,WLCK1 

IF (TAG.EQ.10) THEN 

IF (RLCK10.EQ.0) THEN 
WLCK10=1 


OPEN (UNIT=10 FILE=' ACAVAIL . SQL! STATUS=’ OLD’ ) 
WRITE (10 100) INTRVL, TIME, SID ,/ UNIT, QUANT 
CLOSE UNIT=1 
WLCK10=0 
ELSE 
GOTO 10 
ENDIF 
ENDIF 
IF (TAG.EQ.11) THEN 
IF (RLCK11.EQ.0) THEN 
WLCK11=1 


OPEN (UNIT=11, FILE=’ ACKILLED. SQL’ , STATUS=’ OLD’ ) 
WRITE (11,101) INTRVL, TIME, SIDE, UNIT, CONFLT 
& QUANT, LMSN, SHTER, SMSN, WPNTYP, NUMWPN, REASON 
CLOSE UNIT=11 
WLCK11=0 
ELSE 
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30 


40 
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ENDIF 
IF (TAG.EQ.12) THEN 
IF (RLCK12.EQ.0) THEN 
WLCK12=1 
OPEN (UNIT=12, FILE=’ ACLAUNCH.SQL’ , STATUS=’ OLD’ ) 
WRITE (12,1025 INTRVL, TIME, SIDE, UNIT, MSN, QUANT 
CLOSE UNIT=1 
WLCK12=0 
ELSE 
GOTO 30 
ENDIF 
ENDIF 
IF (TAG.EQ.13) THEN 
IF (RLCK13.EQ.0) THEN 
WLCK13=1 


OPEN (UNIT=13, FILE=’ ACREM. SQL’ , STATUS=’ OLD’ ) 
WRITE (13,100) INTRVL, TIME, SIDE, UNIT, QUANT 
CLOSE UNIT=1 


WLCK13=0 
EL 
GOTO 40 
END 
ENDIF 
FORMAT 15,F10.6,A4,A10,15) 
FORMAT (15,F10.6,A4,A10,A20,15,12,A10,12,15,13) 
FORMAT 15,F10.6,A4,A10, 12, £5) 
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APPENDIX I 
PROGRAM PACK CODE DESCRIPTION 
PROGRAM PACK 


The PACK program will read data from whichever file, 
GAME1.DAT or GAME2.DAT, that is not being written to by 
the PULL program. Once a file has been opened the PULL. 
program 1S prevented from writing to the open file until 
all’ records have been read, deciphered, and c placed into 
the proper JTLS table. When an end of file has been read 
the file will be closed and made accessible to the PULL 
program. The process continues alternating between files 
until the global variable is set to true by the Pull 
program. 


INTEGER INTRVL, LMSN,MSN, NUMWPN, QUANT, REASON, SMSN, TAG, 
&WPNTYP, RCLK8, RLCK9, RLCK10, RLCK11, RLCK12, RLCK13, WLCK8, 
&WLCK9, WLCK10, WLCK11,WLCK12, WLCK1 3 

REAL TIME 

CHARACTER*1 RCD (80 

CHARACTER CONFLT*20, SHTER*10, SIDE*4, UNIT*10 

LOGICAL NOMO 

COMMON /BLK1/RCD 

COMMON /BLK2/INTRVL, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN, 
& TAG, WPNTYP 

COMMON /BLK3/TIME 

COMMON /BLK4/CONFLT, SHTER, SIDE, UNIT 

COMMON /BLK5/RCLK10, RCLK11, RCLK12, RLCK13, WLCK10, WLCK11, 
&WLCK12,WLCK1 3 

DATA RLCK8, RUCK9, WLCK10, WLCK11, WLCK12, WLCK13 
£70, 0-0m0r 0.6 


Alternate reading files until global variable NOMO is true. 
REPEAT 


Teer ue prod tan is not writting to GAME1.DAT disable 
access, read, and process data. 


10 IF (WLCK8 .EQ.0) THEN 
RLCK8=1 
SE Et epee FILE=’ GAME1.DAT, ’ STATUS= ‘OLD’ ) 


AAAQAAAAAAAAANA 


QaQAaQAQA AANA 


20 READ (8, 100, END=30) (RCD (I) I=1, 80) 
c 
c Process record by finding attributes and placing into 
Cc appropriate tables. 
Cc 
CALL FNDATT 
CALL ENTTUP 
GC 
c Read file until end. 
C 
GOTO 20 
ELSE 
C 
c Attempt access until permitted. 
Cc 
GOTO 10 
ENDIF 
C 
c Close file and enable access to Pull program, when an end 
c of file is read from GAME1.DAT. 
Cc 
20 CLOSE UNIT=8 
RLCK8=0 


Cc e 
c If Pull program is not writting to GAMEZ Dal eaicanre 
c access, read, and process data. 
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Cc 


40 IF (WLCK9.EQ.0) THEN 
RLCK9=1 
OPEN (UNIT=9, FILE=’ GAME2.DAT’ , 'STATUS=’ OLD’ ) 
50 READ (9, 100, END=30) (RCD (I) I=1, 80) 
(a 


c Process record by finding attributes and placing into 
Cc appropriate tables. 


Cc 
CALL FNDATT 
CALL ENTTUP 


© 
c Read file until end. 
c 
GOTO 350 
ELSE 
S 
c Attempt access until permitted. 
c 
GOTO 40 
ENDIF 
60 CLOSE UNIT=9 
RLCK9=0 
el 
c Process is repeated until NOMO is set to true. 
s 
UNTIL NOMO 
c 
c While Boers GAME2 . DAT Sa eee last iteration, the Pull 
c program could be Sagat the final set of cies! aes 
c GAME1.DAT and set NOMO to true. This block of instruction 
c outside the REPEAT UNTIL loop will ensure that GAME1.DAT 
c will be read. 
eS 


OPEN (UNIT=8, FILE=’ GAME1 .DAT, 'STATUS=‘OLD’ ) 
70 READ (8,100, END=80) (RCD (I) I=1, 80) 


Process record by finding attributes and placing into 
appropriate tables. 


CALL FNDATT 
CALL ENTTUP 


Read file until end. 


GOTO 70 
80 CLOSE UNIT=8 


STOP 
100 FORMAT (80A1) 

END 
STeCeCCeCCCLCLSLCLCCLCSS SLC SSCL SSCS CSCS SCLC SSCS SSS CoSCS oS SSeS SSeS ee 2 


SUBROUTINE FNDATT 


oneneke) 


qaqqQ 


€ 
c This subroutine determines the length and rag eth 
Cc positions of attributes. When the end of an attribute 
c (DEL) has been located subroutine CONCAN is called to 
c concatenate the characters contained in the attribute. 
© Subroutine CONVRT is called to DECODE and assign value to 
c the actual table attributes. When a space has been located 
c the rotine will terminate. 
S 
INTEGER ANUM, LEN, POS, INX 
CHARACTER*1 DELIM, RCD(80),SP 
CHARACTER ATTR*20 
COMMON /BLK1/RCD 
‘a 
c Initialize variables 
a 
DATA ANUM, DELIM, INX, LEN, POS, SP/1,’&',1,0,1,' ‘/ 
© 
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c The search for attributes continues until the last 
: character is located. 


“10 eee yy .DELIM.OR.RCD(INX) 2E@aer yoann 
EF (RCD ( NX) .EQ. SP) RETURN 


Concatenate characters of attribute. 

CALL CONCAN (POS,ATTR, LEN) 
Convert and/or assign actual attribute. 

CALL CONVRT (ANUM,ATTR, LEN) 
Increment attribute number and array index, initialize 
attribute length and assign the nex attribute’ s starting 
DOSIE Zon, 

ANUM=ANUM+1 

LEN=0O 

INX=INX+1 


POS=INX 
ELSE 


00000700 O36. o 


Increment attribute length and array index if the end of an 
attribute or a record is not found. A error message will 
be printed if the record exceeds 80 characters. 


LEN=LEN+1 
INX=INX+1 
IF (INX.GT.80)PRINT*,’RECORD EXCEEDS 80 CHARACTERS’ 


000-0 


EN 
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SUBROUTINE CONCAN (1,ATTR, LEN) 


This subroutine concatenates the characters elements of 
the attribute into a single character variable. The number 
of required concatenations is determined by the length of 
the attribute (LEN). 


OOOO 'Q 


INTEGER I, LEN 
CHARACTER*1 RCD 80) 
CHARACTER ATTR*Z0 
COMMON /BLK1/ RCD 














c We were unable to confirm if all attributes were mandatory. 
c We included a case for length zero for this possiblity. 
Be: 
IF (LEN.EQ.0)ATTR=’0' 
IF (LEN.EQ.1)ATTR=RCD (I 
IF (LEN.EQ.2)ATTR=RCD (I) //RCD(I+1 
IF (LEN.EQ.3)ATTR=RCD (I) //RCD (I+1) //RCD (I+2 
IF (LEN.EQ.4)ATTR=RCD (I) //RCD (I+1) //RCD (I+2) //RCD (I+3 
TF hee te ATTR=RCD (I) //RCD (I+1) //RCD (I+2) //RCD (I+3 
& 
if (LEN. BQ. 6) ATTR=RCD (1) //RCD (I+1) //RCD (I+2) //RCD (I+3) 
&//RCD (I+ ) {RCD (I+ ) 
IF (LEN.E ) ATTR=RC T) AZ RCD (+1) //RCD (142) //RCD(T+3) 
&//RCD (TH WG ais /RCD ) 
IF (LEN.EQ.8) ATTR=RC RCD Eg +1 hic 1ies eee 
&//RCD I+4) / RCD (I+5) //RCD (I Tso (I yes 
LE GbE EQ. 9) ATTR=RCD (I) //RCD (I+1) //RCD 2) Lp RCD (Tee 
&//RCD (I+ ee I+5) fa | EERO I+7}/7Re ae 
IF (LE EQ. J PAUL Se aye RCD (I+1)//RC cl (I+2)/ RCB(I+3) 
<7 Bee ee TER REGS RCD (1 +6) /7/RCD (ia yee 8) 
IF (LEN. Eg ATTR=RCD ra RGB Fs} 8057294 /8CR (43) 
£//RCD Uh T+5)//RCD (I+6) //RCD (I+7) //RCD (I+8) 
&//RCD i+] 4, BCD I+10) 
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, UNIT*10 
ites 


and the value of 
PolDE-~4 
, NUMWPN, QUANT, REASON, SMSN, 
INTRVL 
TIME 
UEN 100, ATTR) MSN 
UANT 


an 
AND. (TAG.EQ.10.OR.TAG.EQ.16) ) 
01,ATTR) QUANT 
AND. TAG.EO.1 


-AND.TAG.E 
6) DECODE (LE 


N 
CONFLT=ATTR 
DECODE 
,ATTR) 


f 
f 


Ot ALR 
UE, 


102 


f 
f 


L, LMSN, MS 
(LEN 
LEN 
SIDE=ATTR 
Q.1 
pa 


Vv 


COMMON /BLK2/INTR 


& TAG 


DECODE 


, INTRVL, LEN, LMSN, MSN, NUMWPN, QUANT, REASON, 
DECODE 


QO) PRINT*, ‘ATTRIBUTE LENGTH GREATER THAN 20’ 


Once the determination has been made the 


WPNTYP 
(LE 
ANUM.E 


f 


COMMON /BLK3/TIME 
ANUM.EO. 





: 


IF (ANUM.EQ.1)DECODE (LEN,100,ATTR) TAG 
c Identify and assign values to other attributes. 


Cc. 


COMMON /BLK4/CONFLT, SHTER, SIDE, UNIT 
c The table identifier is always the first attribute. 


c also used to determine other attribute assignments. 


Cc 


CHARACTER ATTR*20, CONFLT*20, SHTER*10 


INTEGER ANUM 
&SMSN, TAG 
REAL TIME 

JU) 

ny 

10)3 

& DECODE 

lay 

10) 


KKK KK KKK KKK KKK KEKE KKK KKK KEKE KKK KKK KK KEKE KEKE KKK KEKE KKK KKK KAKE KKK 
SUBROUTINE CONVRT (ANUM,ATTR, LEN) 
IF 


c This subroutine determines the table and tables actual 
c character value 1s decoded 1f required, 


c the actual attribute 1s assigned. 


c attributes. 


Cc 
Cc 
Cc 


IF (ANUM.EQ.8) SHTER=ATTR 
IF (ANUM.EO.9) DECODE (LEN, 103, ATTR) SMSN 
N, 193 ATTR) WPNTYP 


IF (ANUM.EQ. LE 
ANUM. : DECODE (LE 
IF (ANUM.EQ.12) DECODE 


The maximun number of attributes in any table is 12. 
An error message 1S printed is more than 12 attributes 
have been located. 


SE oo ee ‘NUMBER OF ATTRIBUTES EXCEEDS wiz 


IE sie ot 8| eee hae 05 ae 
g 
10) DECODE 

ak 


LEN, , ATTR) NUMWPN 
LEN, 104, ATTR) REASON 








OO OG 


eed ed ono 
OdOdOoOo® 
DBWNPO 
eT 
: 
= 
HH 4 
WhO 
OF 


END 
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SUBROUTINE ENTTUP 
C 


c This subroutine determines which table to enter the 
attributes into and then makes the entry. 
C 


INTEGER INTRVL, LEN, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN 
&TAG, WPNTYP, RLCK10, RLCK11, RLCK12, RLCK, 13, WLCK10, WLCK11, 
&WLCK12,WLCK13 

REAL TIME 

CHARACTER CONFLT*20, SHTER*10, SIDE*4, UNIT*10 

COMMON /BLK2/INTRVL, LMSN, MSN, NUMWPN, QUANT, REASON, SMSN, 

& TAG, WPNTYP 

COMMON /BLK3/TIME 

COMMON /BLK4/CONFLT, SHTER, SIDE, UNIT 

COMMON  /BLK5/RCLK10, RCLK11, RCLK12, RLCK13, WLCK10, WLCK11, 
EWLORIC WLOKIS 


The appropriate table is determined by the variable TAG. 
If the corresponding ORACLE database is accessible (not | 
being queried ey access 1s disabled and the record 1s 
entered into he “tab e. The file is then closed to enable 
gueries. If the table is not accessible the program will 
attempt access until obtained. 
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IF (TAG EQ 10 THE 
IF (RLCK10. 
WCLK1 
OPEN (UNIT=10 
WRITE (10,100) INTRVL, TIME, SIDE, U 


Cc 
c Allow access by query programs after writting into table. 


C 
CLOSE UNIT=10 
WCLK10=0 
ELSE 
GOTO 10 
ENDIF 


DIF 
IF (TAG .FQ. 11) THEN 
20 IF (RLCK11.EQ.0) THEN 
| WLCK1 
OPEN (UNIT=11, FILE=’ ACKILLED.SQL’ , STATUS=' OLD’ ) 
WRITE (11,101) INTRVL, TIME, SIDE, UNIT, CONFLT 
6 QUANT, LMSN, SHTER, SMSN, WPNTYP, NUMWPN, REASON 


C 
c Allow access by query programs after writting into table. 


C 
CLOSE UNIT=11 
WLCK11=0 


N 
EO. 0) thet 
O=1 


FILE=' ACAVAIL.SQL’ , STATUS=’ OLD’ ) 
NIT, QUANT 


80 


IF (TAG.EQ.12 
ine ALCKI2.B EQ. QO) THEN 


OPEN (ONT T= 12,F ILE=’ ACLAUNCH. SQL’ , STATUS=’ OLD’ ) 
WRITE (12,102) INTRVL, TIME, SIDE, UNIT, MSN, QUANT 


C 
c Allow access by query programs after writting into table. 
c 


CLOSE UNIT=12 
WLCK1 2=0 


ELSE 
GOTO sO 
ENDIF 
ENDIF 
IF (TAG.EQ.13) THE 
oP CRI oe os “EQ, OQ) THEN 


OPEN (UNIT= 13, FILE=’ ACREM.SQL’ , STATUS=’ OLD’ ) 
WRITE (13 med TNR Vi, SIME po rDE, UNIT, OUANT 
CLOSE UNIT= 
WLCK13=0 

c 

c Allow access by query programs after writting into table. 


ELSE 
GOTO 40 


100 ,F10. 0, 15) 
Mod oPORMAT (15,F10.6,A4,Al10,A20,15,1I2,A10,12,15,13) 
102 'F10 0,12, 15) 
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APPENDIX J 
RELATIONS 
ACAVAIL (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key: (INTRVL, TIME, UNIT) 
ACKILLED (INTRVL, TIME, SIDE, UNIT, CONFLICT, QUANTITY, 
L MISSION, SHOOTER, S MISSION, WPN TYPE, NO WPNS, REASON) 
~ Key: (ENETRVL, EIME, UND) _ = 


ACLAUNCH SENTRY TIME, SIDE, UNIT, MISSION eet. 


Key: INTRVL, TIME, UNIT 
ACREM (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key: (INTRVL, TIME, UNIT) 
CALIVE (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key: (INTRVL, TIME, UNIT) 
CAVAIL (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key:  (INTRVL, TIME, UNIT) 
COMBATSYS (CODE, SIDE, CS) 
Key: CODE 
CSATT (INTRVL, TIME, SIDE, UNIT, CS, REASON, QUANTITY) 
Key:  (INTRVL, TIME, UNIT, CS) 
CSKV (INTRVL, TIME, SIDE, UNIT, VICTIM, KILLER, QUANTITY) 
Key: (INTRVL, TIME, UNIT, VICTIM) 


CSLOST (INTRVL, TIME, SIDE, UNIT 
Key:  (INTRVL, TIME, UNIT, Cs} 


CSONHAND {INTRVL, TIME, SIDE, UNIT, CS, QUANTIY) 
Key: INTRVL, TIME, UNIT, CS) 


CSRECD- (INTRVE 


CS, REASON, QUANTITY) 


TIME, SIDE, UNIT, CS, REASON, CUA ts 


Key: (INTRVL, TIME, UNIT, CSsJ 
DATA BASE (NAME, CLASS) 
K@y: NAME 


DAYNIGHT (INTRVL, TIME, SUNUP) 
Key: (INTRVL, TIME) 


DICTIONARY (TERM, TABLE, MEANING) 
Key: (TERM, TABLE) 


DIRECTORY (TABLE, CONTENTS, EVENTS) 
Key: TABLE 


HUMINT (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key:  (INTRVL, TIME, UNIT) 

MISSIONS (CODE, MISSION) 
Key: CODE 

MSLFIRED (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key: INTRVL, TIME, UNIT} 

NAVARRNG (INTRVL, TIME, SIDE, UNIT, AR RNG) 
Key: (INTRVL, TIME, UNIT) = 

NAVMSRNG (INTRVL, TIME, SIDE, UNIT, MS RNG) 

Key: (INTRVL, TIME, UNIT) — 
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RELATIONS 


NAVSPEED (INTRVL, TIME, et UNIT, SPEED) 


Key: (INTRVL, TIME, TS 
NAVSRRNG (INTRVL, TIME, SIDE, UNIT, SR RNG) 


Key: PNY ie IE; , 
ORDERS (INTRVL, TIME SENT, SIDE, ORDER TYPE, UNIT, 
TIME SPEC a ae 

Kéy: (INTRVL, TIME SENT, UNIT) 
PPSTATUS (INTRVL, TIME, STATUS) 

Key: (INTRVL, TIME! 
REASONS (CODE, REASON) 

Key: CODE 
SCDEC (INTRVL, TIME, TARGET, CATEGORY, REASON, QUANTITY) 

Key:  (INTRVL, TIME, TARGET, CATEGORY) 
SCDUEIN (INTRVL, TIME, SIDE, UNIT, CATEGORY, QUANTITY) 

Key: (INTRVL, TIME, UNIT, CATEGORY) 
SCDUEOUT (INTRVL, TIME, SIDE, UNIT, CATEGORY, QUANTITY) 

Key: INTRVL, TIME, UNIT, CATEGORY) 
SCINC (INTRVL, TIME, TARGET, CATEGORY, REASON, QUANTITY) 

Key: (INTRVL, TIME, TARGET, CATEGORY) 
SCINDUMP (INTRVL, TIME, TARGET, CATEGORY, QUANTITY) 

Key: INTRVL, TIME, TARGET, CATEGORY) 
SCLOST (INTRVL, TIME, SIDE, UNIT, CATEGORY, REASON, 
QUANTITY, ACTION) 

Key: | (INTRVL, TIME, UNIT, CATEGORY) 
SCONHAND (INTRVL, TIME, SIDE, UNIT, CATEGORY, QUANTITY) 

Key: (INTRVL, TIME, UNIT, CATEGORY) 
SCRECD (INTRVL, TIME, SIDE, UNIT, CATEGORY, REASON, 
QUANTITY) 

Key: (INTRVL, TIME, UNIT, CATEGORY) 


SCSENT (INTRVL, TIME, SIDE, UNIT, CATEGORY, REASON, 
QUANTITY) 
Key:  (INTRVL, TIME, UNIT, CATEGORY) 


SCSHORT (INTRVL, TIME, SIDE, UNIT, CATEGORY, REASON, 
QUANTITY) 
Key: (INTRVL, TIME, UNIT, CATEGORY) 


SCTRANS (INTRVL, TIME, SIDE, UNIT, REASON, DRY WT, WET WT) 
Key: (INTRVL, TIME, UNIT) = = 


See els (CODE, SIDE, CATEGORY) 
Key: CODE 


TALIVE (INTRVL 


TIME, SIDE, UNIT, QUANTITY) 
Key: (INTRVL, TIME, UNIT) 
TARGETS (INTRVL, TIME, ID, NAME, CATEGORY) 
Key: (INTRVL, TIME, ID) 


TAVAIL (INTRVL, TIME, SIDE, UNIT, QUANTITY) 
Key:  (INTRVL, TIME, UNIT) 


TGADA (INTRVL, TIME, ID, STATUS) 
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RELATIONS 


Key: (INTRVL, TIME ee) 
TGCAPABLE (INTRVL, TIME, ID, ACTION, REASON, PCESCAPABTE 
Key: (INTRVL, “EEME ME Ds _ 


TGDETECT LINDE TIME, SIDE, REASON) 


ID 
Key: (INTRVL, TIME, IDS 
TGRANGE (INTRVL, TIME, ID, RNG) 


Key: (INTRVL, TIME, ID) 
TGSIDE (INTRVL, TIME, ID, SIDE) 
Key: (INTRVL, TIME, ID) 
TGSIZE (INTRVL, TIME, ID, SIZE) 
Key: (INTRVL, TIME, ID) 
TGUNIT(INTRVL, TIME, ID, UNIT, LAT, LON) 
Key: (INTRVL, TIME, ID) 


TRKIGEED tT ENGR. TIME, SIDE, UNIT, CARGOS, TANKERS, REASON) 


Key: INTRVL, TIME, UNITS 


UNITS (SHORT NAME, LONG NAME, TYPE, SUBTYPE, SIDE, AIRCRAFT) 
Key: SHORT NAME - 


UTADA (INTRVL, TIME, SIDE, UNIT, STATUS) 


Key: (INTRVL, TIME, UNIT) 

UTAIRBASE (INTRVL, TIME, SIDE, UNIT, AIRBASE) REASONS 
Key:  (INTRVL, TIME, UNIT) 

UTARRIVES (INTRVL, TIME, SIDE, UNIT, LAT, LON) 
Key: (INTRVL, TIME, UNIT) 

UTCAS (INTRVL, TIME, SIDE, UNIT, SQUADRON, NO AIRCRAFT) 
Key: (INTRVL, TIME, UNIT) : 


UTCONTACT (INTRVL, TIME, UNIT1, UNIT2, STATUS, POSTURE1, 
POSTURE2) 
Key:  (INTRVL, TIME, UNIT1,UNIT2) 


UTDELAYED (INTRVL, TIME, SIDE, UNIT, DELAYER SIDE, LAT, LOR 
DURATION) a 


Key:  (INTRVL, TIME, UNIT) 

UTHQ (INTRVL, TIME, SIDE, UNIT, HQ, REASON) 
Key:  (INTRVL, TIME, UNIT) 

UTINCAR (INTRVL, TIME, SIDE, UNIT, INC) 
Key: (INTRVL, TIME, UNIT) 


UTLIFTED (INTRVL, TIME, SIDE, UNIT, LIFTED, STATUS, REASON) 
Key: (INTRVL, TIME, UNITS 


UTPOSTURE (INTRVLy TIME, SIDE, UNIT, NEW POSTURE, 
OLD POSTURE T, LON) a 
Key: (INTRVL, TIME, UNIT) 


UTREINF (INTRVL, TIME, SIDE, UNIT, REINFORCER, STATUS) 
Key: (INTRVL, TIME, UNIT) 


UTSTART (INTRVL, TIME, SIDE, UNIT, LAT, “LON; DEsr cam 


DEST LON) 
Kéy: (INTRVL, TIME, UNIT) 
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RELATIONS 


DrStTOrP (INTRVL, TIME, SIDE, UNIT, LAT, LON, REASON) 


Key: (INTRVL, TIME, UNIT) 

UTSTRNGTH (INTRVL, TIME, SIDE, UNIT, STRENGTH) 
Key: (INTRVL, TIME, UNIT) 

UTSUPPORT (INTRVL, TIME, SIDE, UNIT, SUPPORT UNIT, REASON) 
Key: (INTRVL, TIME, UNIT) = 

UTTRANS (INTRVL, TIME, SIDE, UNIT, DRY WT, WET WT, REASON) 
Key: (INTRVL, TIME, UNIT) = a 

WEAPONS (CODE, TYPE, SIDE) 
Key: CODE 


WPNEXPEND Eh iis fle G) wala SDE UN Lil oot ON eCUANTITY, 


TYPE, REAS 
Key: (INTRVL, TIME, UNIT) 
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INTERRELATION CONTRAINTS 


ACAVAIL [UNIT] 


ACKILLED 
ACKILLED 
ACKILLED 
ACKILLED 
ACKILLED 
ACKILLED 
ACKILLED 
ACLAUNCH 
ACLAUNCH 


[UNIT] 

[L_ MISSION] 
[SHOOTER] 
[S_ MISSION] 
[WPN TYPE] 
[NO _WPNS] 
[REASON] 
[UNIT] 
[MISSION] 


ACREM [UNIT] 


CALIVE 


[UNIT] 


CAVATIC TUNE Dy) 
CSATT [UNIT] 
CSATT acct 
CSATT [REASON] 
CSKV [UNIT] 
CSKV [VICTIM] 
CSKV [KILLER] 


CSLOSt 
CSLOSsTt 


[UNIT] 
[REASON] 


CSONHAND [UNIT] 
CSONHAND [CS] 


CORECD 
CSRECD 
CSRECD 
HUMINT 


MS LF IRED 
NAVARRNG 
NAVSPEED 
NAVSRRNG 


ORDERS 


[UNIT] 
[CS] 
[REASON] 
[UNIT] 
[UNIT] 
[UNIT] 
[UNIT] 
[UNIT] 
[UNIT] 


SCDEC [TARGET] 


SUBSE 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSER 
SUBSET 
SUBSEE 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SWE lek 
SUBSET 
SUBSE, 
SUBSE 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSE 
SUBSET 
SUBSE 
SUBSET 
SUBSET 
SUBSE. 
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OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
CF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
O19 
OF 


UNIT [SHORT NAME] 
UNITS [SHORT NAME] 
MISSION [CODE] 
UNITS [SHORT NAME] 
MISSION [CODE] 
WEAPONS [CODE] 
WPNEXPED [QUANTITY] 
REASONS [CODE] 
UNITS [SHORT NAME] 
MISSION [CODE] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
COMBATSYS [CS] 
REASONS [CODE] 
UNITS [SHORT NAME] 
COMBATSYS [CS] 
COMBATSYS [CS] 
UNITS [SHORT NAME] 
REASONS [CODE] 
UNITS [SHORT NAME] 
COMBATSYS [CS] 
UNITS [SHORT NAME] 
COMBATSYS [CS] 
REASONS [CODE] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
TARGET [ID] 


INTERRELATION CONTRAINTS 


SCDHG mI CATEGORY | 
SCDEC [REASON] 
SCDUEIN [UNIT] 
SCDUEIN [CATEGORY] 
SCDUEOUT [UNIT] 
SCDUEOUT [CATEGORY] 
SCINC [TARGET] 
SCINC [CATEGORY] 
SCINC [REASON] 
SCINDUMP [TARGET] 
SCINDUMP [CATEGORY] 
SCLOST [UNIT] 
SCLOST [CATEGORY] 
SCONHAND [UNIT] 
SCONHAND [CATEGORY] 
SCRECD [UNIT] 
SCRECD [CATEGORY] 
SCRECD [REASON] 
SCSENT [UNIT] 
SCSENT [CATEGORY] 
SCSENT [REASON] 
SCSHORT [UNIT] 
SCSHORT [CATEGORY] 
SCSHORT [REASON] 
SCTRANS [UNIT] 
SCTRANS [REASON] 
TALIVE (UNIT) 
TAVAIL [UNIT] 
TGADA [ID] 
TGCAPABLE [ID] 
TGCAPABLE [REASON] 
TGDETECT [ID] 
TGDETECT [REASON] 


SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBOET 
SUBSET 
SUBSET 
SUESET 
SUBSET 
SUBSET 
SUBSET, 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
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OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
Or 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
Or 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
Or 
OF 
OF 
Or 
OF 
OF 
OF 
OF 
Or 


SUPPLIES [CATEGORY] 
REASONS [CODE] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
TARGETS [ID] 
SUPPLIES [CATEGORY] 
REASONS [CODE] 
TARGETS [ID] 
SUPPLIES [CATEGORY] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
REASONS [CODE] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
REASONS [CODE] 
UNITS [SHORT NAME] 
SUPPLIES [CATEGORY] 
REASONS [CODE] 
UNITS [SHORT NAME] 
REASONS [CODE] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
TARGETS [ID] 
TARGETS [ID] 
REASONS [CODE] 
TARGETS [ID] 
REASONS [CODE] 


INTERRELATION CONTRAINTS 


TGRANGE [ID] 
TGSIDE lun 

TGSIZE [ID] 

TGUNIT [ID] 

TGUNIT [UNIT] 
TRKILLED [UNIT] 
UTADA [UNIT] 
UTAIRBASE [UNIT] 
UTAIRBASE [AIRBASE] 
UTAIRBASE [REASON] 
UTARRIVES [UNIT] 
UICAS © PUNIT | 

UTCAS [SQUADRON] 
UTCONTACT [UNIT1] 
UPCONTAGCE MLUll in | 
UTDELAYED [UNIT] 
UTHQ [UNIT] 

WOM BISKO) 4 |[e1@)) 

UTHQ [REASON] 
UTINCAR [UNIT] 
UTINCAR [INC] 
UTLIFTED [UNIT] 
UTLIFTED [LIFTER] 
UTPOSTURE [UNIT] 
UTPOSTURE [REASON] 
UTREINF [UNIT] 


UTREINF [REINFORCER] 


UTSTART [UNIT] 
UTSTOP [UNIT] 
UTSTOP [REASON] 
UTSTRENGTH [UNIT] 
UTSUPPORT [UNIT] 


SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSE E 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUB OEE 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSE E 
SUBSET 
SUBSET 


UTSUPPORT S[SUPRORT UN DiSUBSEL 
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OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OG 
OF 
Cr 
OF 
OF 
O12 
OF 
Cr 
OF 
OF 
Or 
OF 
CO 
OE 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
Or 


TARGETS 
TARGETS 
TARGETS 
TARGETS 


UNEES 
UNITS 
UNITS 
UNITS 
UNITS 


(ID) 
[ID] 
[ID] 
[ID] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 


REASONS [CODE] 


UNITS 
UNITS 
UNITS 
UNITS 
UNITS 
UNITS 
UNITS 
UNITS 


[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 


REASONS [CODE] 


UNITS 
UNITS 
UNITS 
UNITS 
UNITS 


[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 
[SHORT NAME] 


REASONS [CODE] 


UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT_NAME] 
UNITS [SHORT NAME] 
REASONS [CODE] 

UNITS [SHORT _NAME] 
UNITS [SHORT NAME] 
UNITS [SHORT_NAME] 


INTERRELATION CONTRAINTS 


UTSUPPORT [REASON] 
UTTRANS [UNIT] 
WPNEXPEND [UNIT] 
WPNEXPEND [MISSION] 
WPNEXPEND [TYPE] 
WPNEXPED [REASON] 


SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
SUBSET 
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OF. 
OF 
OF 
OF 
OF 
OF 


REASONS [CODE] 
UNITS [SHORT NAME] 
UNITS [SHORT NAME] 
MISSIONS [CODE] 
WEAPONS [TYPE] 
REASONS [CODE] 


DOMAIN NAME 
AIR_RADAR_RANGE 


CLASSIFICATION 


CODE AIR MISSION 


CODE AIR WEAPON 


CODE COMBAT SYS 


CODE SUPPLY CATEGORY 


CONFLICT 


EVENT 


INTERVAL 


LATITUDE 
LONGITUDE 
MEANING 


NAME AIR MISSION 


NAME AIR WEAPON 
NAME COMBAT SYSTEM 
NAME DATA BASE 


NAME (SUPPLY SCALE GORY 


NAME TABLE 


DATA DOMAINS 


FORMAT & MEANING 


Real number 0.0 to 100000. See 
hese Requirements Manual pp. 


CHAR(20) Characters "#", and 
"&" are not allowed. Database 
security classification. 


Positive integer less than 17% 
see Postprocessor User Guide 
table C-193prp = 


Positive integer 1 to 9999. See 
Me? ae ae Manual pp. 


Positive integer 1 to 327c7e 
(physical limitation). 


Positive integer 2 to 32767 
(physical limitation). See Data 
Requirements Manual pp. A-289. 


Value is "AIR.TO.AIR", 
"GROUND.TO.AIR", or e: 
"WHILE.NOT.FLYING". Identifies 
type of conflict for aircraft 
casualty. 


CHAR(15) Characters "#" and "é" 
are not allowed. Identifies 
event numbers feeding a table. 


Positive integer 1 to 32767. 
(physical limitation). 
Identifies a continuous period 
of game play. 


Real -90.0 to 90.0. 

REAL -1607 0 Geomis0yiae 

CHAR(100) Characters "#", and 
"é" are not allowed. Meaning of 
attribute, or contents of table. 
Values contained in_. 
Postprocessor User Guide table 
C-19, pp. Ga iee 


CHAR(20) Characters "#", andi. 
are not allowed. 


CHAR(20) Character "#", or "é&" 
are not allowed. 


CHAR(20) Characters "#", and "&" 
are not allowed. 


CHAR(20) Characters "#", or "&", 
are not allowed. 


CHAR(20) Characters "#", and "é&" 
are not allowed. 
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DATA DOMAINS 


DOMAIN NAME FORMAT & MEANING 

NAME TARGET SHORT CHAR (20). Characters "#" and 
a am "Ee" are not allowed. 

NAME TARGET LONG CHAR(40). Characters "#" and "«¢" 
a as are not allowed. 

NAME TERM CHAR(20) Characters "#", and "&" 


are not allowed. Attribute or 
column title in a table. 


NAME UNIT SHORT CHAR (10). Characters "#" and 
= - "é" are not allowed. Names of 
airbases, ground units, naval 

units, and squadrons. 


NAME UNIT LONG CHAR(20). Characters "#" and "&" 
7 = are not allowed. Names of 
airbases, ground units, naval 
UunzeEs, and squadrons. 


NAVAL MISSILE RANGE Real 0.0 to 1.7E38 (physical 
i = aise pobedempetl [er See Data 
Requirements Manual pp. A-262. 
NAVAL UNIT SPEED Real 0.001 to 1.7E38 (physical 
= a pao e ten ee see Data 
Requirements Manual pp. A-452. 


ORDER TYPE CHAR(40) Character "#", or "é" 
e are not allowed. Identifies type 
of order given by player. 


PERCENTAGE Real number 0.0 to 1.0. 
identifies percentage of combat 
Soe cmhpoieer weed, COMmoake «system 
killed,combat system lost, 
combat system on hand, combat 
system received, and farget 
capability. 


QUANTITY Positive integer Q to 32767 
He ee latioeat lon) \. 
dentifies the number of 
aver reeminmuOLe, alrerat te. 
killed, aneieinad tt available 
available for launch, aircraft 
aEeratt provading close air 
slabig@iaigie Hematol ng: air weapons 
fired, cargo trucks killed, 
cargo trucks available for 
Son oy, Cargo trucks in convoys, 
cargo trucks. remaining,, HUMINT 
teams available, naval missiles 
fired, tanker trucks killed, 
tanker trucks available for 
convoy, tanker trucks in 
convoys, and tanker trucks 
remaining. 


REASON AIRBASE Positive integer, Identifies 
7 method of establishing airbase. 
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DATA DOMAINS 


DOMAIN NAME FORMAT & MEANING 
REASON AIRCRAFT KILL Positive fra ee of valu 
— — ve wy Pea ots ia "66", 


eit ebm me huo or m7 o5u 
Iden ifies cause Of aircraft 
aLt Litton: 


REASON CODE Positive integer O to 107. See 
am F038 CPHOC eS aaa User Guide table 
C-27, pp. Caiman 


REASON CS LOST CBT Positive integer of value 
— — — 6s", Oe Oey Li "AZ or Hoo. 
Identifies cause of a Combat 
system’s attrition (combat). 


REASON CS LOST NCBT Positive athe Pal OF valu 
—_— —— —- wo qit Wola "AO or T4qn. 
Iden ifies cause ae’ a combat 
system’s attrition (non combat). 


REASON CS RECEIVED Positive integer of value 
eae if "36","71", or “85". [dentist 
reason for receipt of combat 
system. 


REASON EXPEND PoSitive integer of value "11", 
se "15", or "50". Identifies reason 
for air weapon expended. 


REASON HO Positive integer of value 
— ON wa. Site tt ee or 79". 
Identifies method Of 
establishing headquarters. 


REASON NAME CHAR(40) See values 
i Postprocessor User Guide table 


C277 pp .0ce 


REASON SUPPLY DECR Positive integer of value "12", 
— — "13" or "14" “Tdentifies reason 
for supply category decrease. 
REASON SUPPLY INCR Sitive integer of value 


nein ee) oe 2S Or: mogr. 
Iden ifies reason for supply 
category increase. 


REASON SUPPLY LOSS Positive infeger of value 
a a ey sy ft 19" 6" Wd] 7" 
nagh woGu n3qu wesc N50, moon 
nEgt. or "Gi Laem ifies reason 
for Supply category lost. 


REASON SUPPLY RECD Positive saa En of value 
baz ae ws tt aa tt we wt we ut ae 
ny ght W3 4a" ie pa Dean 
neon! wagw! Oe r "87". 
Identifies enon supply 
category received. 


REASON SUPPLY SENT Positive rete Ow valu 
aaa a ve 4 ve vt 5 e 6* wt ve wt 57 vt 


nagh Rohm n3qn cw he Ro hu WoOu 


eZ 


DATA DOMAINS 


DOMAIN NAME FORMAT & MEANING 


a0, 7 Oo, or 92". Tdentifies 
reason supply Category sent. 


REASON SUPPLY SHORT Eo Ss eh es of value 
= = nyo iS a "14", Identifies 
reason for Stele category 
shortage. 
REASON SUPPLY TRANS Positive integer of value 


May. OF 2". Identifies 
supply category means of 


transportation. 
REASON TARGET CAP Positive inte er of value 
a =a ii ve vt tt ai a ve tt 2. 6 ae , # ee 


nogh WOM nh ei Maen, fou ” 

n7QW! Wogan’ nggn’ or hao7". 
Identifies reason for change in 
maorget, Status. 


REASON TARGET DET itive integer of valu 
—— — nen "gyn "wag" oO; slat! Stk W7gw 
or ace Iden ifies source of’ 


target’s detection. 


REASON TRUCK KILL Fe pee inte er of value 
_ 7a ds haar 7 Ole ",. Identifies 
cause "OF EmucGkwatcerition. 


REASON UNIT LIFT Positive integer of value 
a - wa YS" omevo2! . Identafies 
method of unit lift. 


REASON UNIT POSTURE Positive inte er of value 
mee TAO ty wE oi WE qa wE 95 1 "62", 
nw7gt" f Wagh noah ngqgn an beN 
"g7" "E88" or "Ol", Identifies 
reason for change in unit 
posture. 


REASON UNIT STOP Positive amass of value 
— — wt te hi A mryie coe 
raat magn "ggn- or WO5 fr 
Identifies reason for unit Stop. 


REASON UNIT SUPPORT Positive integer of value 
— — Oe, att wes ae w i ae we" or ag 2 
Identifies reason four” Une 
Support. 
REASON UNIT TRANS Positive integer of value 
7 _ Runes ae or "62". Identifies 


unit’s means of transportation. 


SIDE CHAR(4) Value is "BLUE" or 
"RED". Identifies unit as 
friendly CEunost1 le. 


SIDES CHAR(10) Value is "BLUE", 
"NEUTRAL", or "RED." Identifies 
targets and unit delays as 
friendly, hostile, or neutral. 


oS 


DOMAIN NAME 
STATUS 


SUPPLY CATEGORY LOST 


SURFACE RADAR RANGE 


TARGET CAPABPEOTIyY 


TARGET CATEGORY 


TARGET RANGE 


TARGET Sie 


TIME 


UNIT POSTURE 


UNIT SUBTYPE 


UNIT TYPE 


WEIGHT 


DATA DOMAINS 


FORMAT & MEANING 


Integer value of *0°) ora 
Identifies status of day/night, 
Postprocessor, ADA Of a targeae 
ADA of an unit, unit lift; ame 
unit reinforcement. 


CHAR(20) Value is "CONSUMED", 
"NATTRITED", or "OTHER". 


Real 0.0 to 1.7E38 (physical 
limitation). See Data 
Requirements Manual pp. A-264. 


CHAR(20) Value is "CREATED" 
"HIT", "KILLED", or "REPATRED™, 
Identifies the reason for a 
change in target capability. 


CHAR(30) See values_. 
Postprocessor User Guide table 
C=41, Ppp... 


Real 0.0 to 1.7E38 (physmeam 
pine pene 3 See Data 
Requirements Manual pp. A-412. 


Positive integer of value "1", 

"2", or "3". Identifies sizemee 
target. See Postprocessor Uses 

Guide table C-48, p. C-31l. 


Real number 0.0 to 365. 
Identifies game time (in decimal 
days). 


CHAR(20) See values 
Postprocessor Users Guide table 
€=56,8 Pp. 7o-> o. 


CHAR (20) See values_. 
Postprocessor Users Guide table 


C-51-— pp. Gase 


CHAR (20) See values 
Postprocessor Users Guide table 
€-51) pp sG-ss 


Real number 0,0 to 1.7E38 
(physical limitation). See Data 
Requirements Manual pp. A-373. 
Identifies weight for supply 
eer edory or transported 

Unc, 
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ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 
ACAVAIL.INTRVL 
ACAVAIL.TIME 
ACAVAIL.SIDE 
ACAVAIL.UNIT 
ACAVATL. QUANTITY 


ACKILLED. 
ACKILLED. 
meme iLED . 
ACKILLED 
ACKILLED 
ACKI LLED 
ACKILLED. 
ACKILLED. 
ACKILLED. 
ACKILLED 
ACKILLED 
ACKILLED 
ACLAUNCH. 
ACLAUNCH. 
ACEAUNCH ; 
ACLAUNCH. 
ACLAUNCH 
ACLAUNCH. 


INTRVL 
TIME 
SIDE 


-UNLT 
SCONE ELECT 
. QUANTITY 


L MISSION 
SHOOTER 
S MISSION 


.WPN TYPE 
.NO_WPNS 
. REASON 


INTRVL 
TIME 
SIDE 
UNIT 


»-MISSION 


QUANTITY 


ACREM. INTRVL 
ACREM. TIME 
ACREM. SIDE 
ACREM. UNIT 
ACREM. QUANTITY 
CALIVE.INTRVL 
CALIVE. TIME 
CALIVE.SIDE 
CALIVE.UNIT 
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DOMAIN 


INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
QUANTITY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
CONFLICT 
QUANTITY 
CODE AIR MISSION 
NAME UNIT SHORT 
CODE AIR MISSION 
CODE AIR WEAPON 
QUANTITY 

REASON AIRCRAFT KILL 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
CODE AIR MISSION 
QUANTITY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
QUANTITY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIB 


CALIVE 
CAVAIL 
CAVAIL 
CAVAIL 
CAVAIL 
CAVAIL 
COMBAT 
COMBAT 
COMBAT 
COATT. 
CSATT . 
CoAT. 
Con ET 
CoALet 
COATT: 
CSATT. 
Cony a2 
CSKy +i 
CSKV.S 
Cony. U 
Conv av 
Cony kK 
Cakv 70 


CSLOST. 
CSLOST. 
CSLOST. 
CSLOsi2 
CeLesat. 
CSeL@stl: 
CSLOST. 


CSONHA 
CSONHA 


UTE 

. QUANTITY 
. INTRVL 

; LIME 

-o lb es 
.UNIT 
QUANTITY 
325. CODE 
IS. DE 
SYS2GsS 
INTRVL 
TIME 

SIDE 

UNIT 


sCS 


REASON 
QUANTITY 
NTRVL 

IME 

IDE 

NET 

ECLIM 

LOI FAs. 
UANTITY 
INTRVL 
TIME 
SIDE 
UNIT 

CS 
REASON 
QUANTITY 
ND.INTRVL 
Ne Ere 
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DOMAIN 


QUANTITY 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
QUANTITY 

CODE COMBAT SYS 
SIDE 

NAME COMBAT SYSTEM 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME COMBAT SYSTEM 
REASON CS LOST CBT 
PERCENTAGE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME COMBAT SYSTEM 
NAME COMBAT SYSTEM 
PERCENTAGE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME COMBAT SYSTEM 
REASON CS_LOST_NCBT 
PERCENTAGE 
INTERVAL 

TIME 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 
CSONHAND.SIDE 
CSONHAND. UNIT 
CSONHAND.CS 
CSONHAND .QUANTITY 


Pon ECD. 


CSrkecD 


coRECDe 
CeoreCD. 


CSRECD 


eSRECD. 


CSRECD 


INTRVL 
oT ME 
SDE 
UNIT 

eco 
REASON 
QUANTITY 


DATA BASE.NAME 
DATA BASE.CLASS 
DAYNIGHT.INTRVL 
DAYNIGHT. TIME 
DAYNIGHT.SUNUP 
DICTIONARY . TERM 
DICTIONARY . TABLE 
DICTIONARY .MEANING 
DIRECTORY . TABLE 
DERECTORY .CONTENTS 
BerRECTORY .EVENTS 


HUMINT 
HUMINT 
HUMINT 
HUMINT 
HUMINT 


mo RW 
eel ME 

5 SIL) B)) 

. UNG 
QUANTITY 


MISSIONS.CODE 
MISSIONS .MISSION 
Moor TIRED. INTRVL 
MSLFIRED.TIME 
MSLFIRED.SIDE 


oF 


DOMAIN 
SIDE 

NAME UNIT SHORT 
NAME COMBAT SYSTEM 
PERCENTAGE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME COMBAT SYSTEM 
REASON CS RECIEVED 
PERCENTAGE 

NAME DATA BASE 
CLASSIFICATION 
INTERVAL 

TIME 

STATUS 

NAME TERM 

NAME TABLE 

MEANING 

NAME TABLE 

MEANING 

EVENT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
QUANTITY 
CODE AIR MISSION 
NAME AIR MISSION 
INTERVAL 

TIME 

SIDE 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 
MSEP tT RED.UNa. 
MSLFIRED.QUANTITY 


NAVARRNG. 
NAVARRNG. 
NAVARRNG. 
NAVARRNG. 


NAVARRNG 


NAVMSRNG 


NAVSPEED 


NAVSPEED 


INTRVL 
TIME 
SIDE 
UNIT 


.AR_RNG 
NAVMSRNG. 
NAVMSRNG. 
NAVMSRNG. 


INTRL 
TIME 
SIDE 


UNE & 
NAVMSRNG. 
NAVSPEED. 


MS_RNG 
INTRVL 


ot hie 
NAVSPEED. 


SIDE 


.UNIT 
NAVSPEED. 
NAVSRRNG. 
NAVSRRNG. 
NAVSRRNG. 
NAVSRRNG. 
NAVSRRNG. 


SPEED 
INTRVL 
TIME 
SIDE 
UNIT 
SR_RNG 


ORDERS. INTRVL 
ORDERS. TIME SENT 
ORDERS .SIDE 
ORDERS .ORDER_TYPE 
ORDERS.UNIT 
ORDERS.TIME SPEC 


PPSTATUS. 
PRSTALUS. 
PrSPAtUS. 


INTRVL 
TIve 
STATUS 


REASONS. CODE 


DOMAIN 

NAME UNIT SHORT 
QUANTITY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
AIR RADAR RANGE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAVAL MS_RANGE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAVAL UNIT SPEED 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
SURFACE RADAR_RANGE 
INTERVAL 

TIME 

SIDE 

ORDER_TYPE 

NAME UNIT SHORT 
TIME 

INTERVAL 

TIME 

STATUS 

REASON CODE 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 


REASONS. 


NAME 


SCDEC.INIRVL 


SeDEC .TI 


ME 


Scurnc. TARGES 
SCDEC. CATEGORY 
SCDEC. REASON 
SCDEC.QUANTITY 


SeDUEIN. 
SCDUEIN. 
SCDUEIN. 
SCDUEIN. 
SCDUEIN 
SCDUEIN. 


secDUEOUT. 
SscUUROUT . 
ScCUDUBOUT. 
SCDUEOUT. 
SCDUEOUT. 


SCDUEOUT 
ScliNC.IN 


INTRVL 
TIME 
SIDE 
UNIT 


. CATEGORY 


QUANTITY 
INTRVL 
TIME 
SLE 
UNIT 
CATEGORY 
FOUANT TTY 
TRVL 


SCINC. TIME 


SeLINC.SI 


DE 


SCINC. TARGET 
SCINC. CATEGORY 
SCINC. REASON 
SeENC .QUANTITY 


SCINDUMP 
SCINDUMP 
SCINDUMP 
SCINDUMP 
SCINDUMP 
SCINDUMP 


- INTRVL 

. TIME 
Polk 

. TARGET 

. CATEGORY 
.QUANTITY 


oY 


DOMAIN 
REASON NAME 

INTERVAL 

TIME 

NAME TARGET SHORT 
NAME SUPPLY CATEGORY 
REASON SUPPLY DECR 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 

NAME SUPPLY CATEGORY 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 

NAME SUPPLY CATEGORY 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME TARGET SHORT 
NAME SUPPLY CATEGORY 
REASON SUPPLY _INCR 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME TARGET SHORT 
NAME SUPPLY CATEGORY 
WEIGHT 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 


S(O, ise 
- LIME 
SCE ok 
UNITES 

. CATEGORY 
. REASON 
-QUANTITEY 
. ACTION 


SCLOST 


SCLOST 
SCLOST 
SCLOST 
SCLOST 
SCLOST 


INTRVL 


Sl DE 


SCONHAND. 


SCONHAND 


SCONHAND. 
5 Oils jlese 

. CATEGORY 
+«QUANTIEY 


SCONHAND 
SCONHAND 
SCONHAND 


INTRVL 


- LIME 


SIDE 


SCRECD 2 
, (LIME 
SCRECD: 
-UNIT 
CATEGORY 
. REASON 
SCRECD . 
SCSENT. 
OCOENT. 
SCOENE. 
SCSENT. 
. CATEGORY 
. REASON 
QUANTITY 


SCRECD 


SCRECD 
SCRECD 
oCRECD 


SCSENT 
SCSENT 
SCSENT 


INTRVL 


SDE 


QUANTITY 
INTRVL 
TIME 
SIDE 
UNIT 


SCSOHORT. INNER, & 
SCSHORT. TIME 
SCSHORT. oles 
SCOHOR 2 Uiiiat 
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DOMAIN 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 

NAME SUPPLY CATEGORY 
REASON SUPPLY LOST 
WEIGHT 

SUPPLY CATEGORY LOST 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 

NAME SUPPLY CATEGORY 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 

NAME SUPPLY CATEGORY 
REASON SUPPLY RECD 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 

NAME SUPPLY CATEGORY 
REASON SUPPLY SENT 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 
SCSHORT . CATEGORY 
SCSHORT . REASON 
SCSHORT. QUANTITY 
SCTRANS. INTRVL 
SCTRANS.TIME 
SCTRANS.SIDE 
SCTRANS.UNIT 
SCTRANS . REASON 
SCTRANS.DRY WT 
SCTRANS.WET_WT 
SUPPLIES.CODE 
SUPPLIES. SIDE 
SUPPLIES. CATEGORY 
TALIVE. INTRVL 
TALIVE. TIME 
TALIVE.SIDE 
TALIVE.UNIT 
TALIVE.QUANTITY 
TARGETS. INTRVL 
TARGETS. TIME 
TARGETS.ID 
TARGETS . NAME 
TARGETS . CATEGORY 
TAVAIL. INTRVL 
TAVAIL. TIME 
TAVAIL.SIDE 
TAVAIL.UNIT 
TAVAIL. QUANTITY 
TGADA. INTRVL 
TGADA. TIME 
TGADA.ID 
TGADA.STATUS 
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DOMAIN 


NAME SUPPLY CATEGORY 
REASON SUPPLY SHORT 
WEIGHT 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
REASON SUPPLY TRANS 
WEIGHT 

WEIGHT 

CODE SUPPLY CATEGORY 
SIDE 

NAME SUPPLY CATEGORY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
QUANTITY 

INTERVAL 

TIME 

NAME TARGET SHORT 
NAME TARGET LONG 
TARGET CATEGORY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
QUANTITY 

INTERVAL 

TIME 

NAME TARGET SHORT 
STATUS 


ATTRIBUTE 
TGCAPABLE . 


TGCAPABLE 


TGCAPABLE. 


TGCAPABLE 
TGCAPABLE 
TGCAPABLE 
TGDETECGa. 
TEpDELE Ci. 
TGDELTECL. 
IGDETECT: 
EGDETECr. 


ATTRIBUTE DOMAIN CORRESPONDENCE 


INTRVL 
. TIME 
gi) 9, 

. ACTION 
. REASON 
.PCT CAPABLE 
INTRVL 
TMi 

JEG, 

SDE 
REASON 


TGRANGE. 


TGRANGE 


TGRANGE. 


TGRANGE 
EGS tDEs 
TGSIBE: 
TGoLDE. 
TGoLpE. 
TGS Eas. 
TGSL4E. 
TGSIZE 
EGS UAE. 
TGUNIT. 
TGUNIT 
TGUNIT. 
TGUNZa 
TGUNIT. 
TCUNIT TL. 


INTRVL 
oy ers 
ID 

» RNG 
INTRVL 
TIME 

aD 

SIDE 
INTRVL 
Ps 


ae 


SIZE 
INTRVL 


Ah AG aS, 


ID 
UNIT 
LAT 
LON 


TRETELEDSINIRVE 
TRAILELED. VIME 
TRKILLED.SIDE 


OZ 


DOMAIN 

INTERVAL 

TIME 

NAME TARGET SHORT 
TARGET CAPABILITY 
REASON TARGET CAP 
PERCENTAGE 
INTERVAL 

TIME 

NAME TARGET SHORT 
SIDES 

REASON TARGET DET 
INTERVAL 

TIME 

NAME TARGET SHORT 
TARGET RANGE 
INTERVAL 

TIME 

NAME TARGET SHORT 
SIDES 

INTERVAL 

TIME 

NAME TARGET SHORT 
TARGET SIZE 
INTERVAL 

TIME 

NAME TARGET SHORT 
NAME UNIT SHORT 
LATITUDE 
LONGITUDE 
INTERVAL 

TIME 

SIDE 


ATTRIBUTE DOMAIN CORRESPONDENCE 


AEE RI BUTE 
Peel Lhe Dp. UNIT 
TRKILLED.CARGOS 
TRKILLED.TANKERS 
TRKILLED .REASON 


UNI TS# 
UNITS. 
UNITS. 
UNITS. 
UNITS. 
UNITS. 
UTADA. 
UTADA. 
UTADA. 
UTADA. 
UTADA. 


SHORT NAME 
LONG_NAME 
TYPE 
SUBTYPE 
SIDE 
AIRCRAFT 
INTRVL 
TIME 

SIDE 

UNIT 
STATUS 


UTAIRBASE.INTRVL 
UTAIRBASE. TIME 
UTAIRBASE.SIDE 
UTAIRBASE.UNIT 
UTAIRBASE .AIRBASE 
UTAIRBASE. REASON 
UTARRIVES.INTRVL 
UTARRIVES . TIME 
UTARRIVES .SIDE 
UTARRIVES .UNIT 
UTARRIVES. LAT 
UTARRIVES . LON 


UTCAS. 
. (IMS 
UTCAS. 
pena TL 

. SQUADRON 


UTCAS 


UTCAS 
UTCAS 


INTRVL 


SIDE 
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DOMAIN 


NAME UNIT SHORT 
QUANTITY 
QUANTITY 

REASON TRUCK KILL 
NAME UNIT SHORT 
NAME UNIT LONG 
UNIT TYPE 

UNIT SUBTYPE 
SIDE 

QUANTITY 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
STATUS 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 
REASON AIRBASE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
LATITUDE 
LONGITUDE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 


ATTRIBUTE 


ATTRIBUTE DOMAIN CORRESPONDENCE 


UTCAS .NO_AIRCRAFT 


UTCONTACE: 


UTCONTACE 


UT COMPACT 


UTCONTACE 


UTCONEACT: 


UTCONTACT 
UTCONTACT 


UTDELAYED. 


UTDELAYED 


UTDELAYED. 


UTDELAYED 
UTDELAYED 


UTDELAYED. 


UTDELAYED 
UTDELAYED 


INTRVL 

. TIME 
UNIT1 
.UNIT2 
STATUS 

. POSTURE1 
. POSTURE2 
INTRVL 

. TIME 
SIDE 
.UNIT 
.DELAYER_ SIDE 
LAT 

. LON 

. DURATION 


UTHQ.INTRVL 


UTRO LIME 
UTHO] = IDE 
UTHO {UNE 
UTHO{HO 


UTHQ . REASON 
UTINCAR.INTRVL 


UTINCAR.T 
UTINCAR.S 


IME 
1B) >: 


UTINCAR.UNIT 


UTINCAR.I 
UTLIETED? 
UPELE TED 
UTE PELE b 
ULEIETED 
UTDGE-LE Le 


NC 
INTRVL 


- LIME 


SIDE 


Pe) abe & 


IE Sa Bley. 
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DOMAIN 

QUANTITY 
INTERVAL 

TIME 

NAME UNIT SHORT 
NAME UNIT SHORT 
STATUS 

UNIT POSTURE 
UNIT POSTURE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
SIDES 

LATITUDE 
LONGITUDE 

TIME 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 
REASON HQ 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 


ATTRIBUTE DOMAIN CORRESPONDENCE 


ATTRIBUTE 
UTLIFTED. STATUS 
UTLIFTED . REASON 
UTPOSTURE. INTRVL 
UTPOSTURE. TIME 
UTPOSTURE. SIDE 
UTPOSTURE. UNIT 
UTPOSTURE.NEW POSTURE 
UTPOSTURE.OLD POSTURE 
UTPOSTURE. REASON 
UTPOSTURE. LAT 
UTPOSTURE . LON 
UTREINF. INTRVL 
UTREINF . TIME 
UTREINF .SIDE 
UTREINF .UNIT 
UTREINF .REINFORCER 
UTREINF .STATUS 
UTSTART. INTRVL 
UTSTART. TIME 
UTSTART.SIDE 
UTSTART. UNIT 
UTSTART. LAT 
UTSTART . LON 
UTSTART.DEST LAT 
UTSTART.DEST LON 
UTSTOP . INTRVL 
UTSTOP . TIME 

UTSTOP .SIDE 

UTSTOP .UNIT 
UTSTOP . LAT 
UTSTOP . LON 
UTSTOP . REASON 


EO'S 


DOMAIN 


STATUS 

REASON UNIT LIFT 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
POSTURE 

POSTURE 
REASON UNIT POSTURE 
LATITUDE 
LONGITUDE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 
STATUS 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
LATITUDE 
LONGITUDE 
LATITUDE 
LONGITUDE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
LATITUDE 
LONGITUDE 
REASON UNIT STOP 


ATTRIBUTE 


UTSTRENGTH. 
UTSTRENGTH. 
ULTSTRENGTEH. 
UTSTRENGTH. 
UTSTRENGTH: 


UTSUBEBORT 
UTSUPPORT 
ULTSUPPORT: 
UTSUPE ORT. 
UTSUPEORT. 
UTSUPPORT 
UTTRANS.IN 
UTTRANS .TI 
UTTRANS.SI 
UTTRANS.UN 


ATTRIBUTE DOMAIN CORRESPONDENCE 


INTRVL 
TIME 
SIDE 
UNIT 
STRENGTH 
INTRVL 


LIME 


SIDE 
UNIT 
SUPPORT UNIT 


. REASON 


TRVL 
ME 
DE 
8 i 


UTTRANS.DRY WT 


UTTRANS .WE 


T WT 


UTTRANS . REASON 


WEAPONS .CO 
WEAPONS. TY 
WEAPONS.SI 
WPNEXPEND. 
WPNEXPEND 
WPNEXPEND. 
WPNEXPEND 
WPNEXPEND 
WPNEXPEND 
WPNEXPEND 


DE 
EE 
DE 
INTRVL 


aE 


SIDE 


UNIT 
.MISSION 
. QUANTITY 
pole by 


WPNEXPED. REASON 
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DOMAIN 


INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
PERCENTAGE 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
NAME UNIT SHORT 
REASON UNIT SUPPORT 
INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
WEIGHT 

WEIGHT 
REASON UNIT TRANS 
CODE AIR WEAPON 
NAME AIR WEAPON 
SIDE 

INTERVAL 

TIME 

SIDE 

NAME UNIT SHORT 
CODE AIR MISSION 
QUANTITY 
CODE AIR WEAPON 
REASON_EXPEND 


APPENDIX I 
FLOW CHARTS 


Program PUSH MAIN 


START 


INITIALIZE 
VARIABLES 


INITIALIZE 
FILES 
(IFILES) 


INITIALIZE 
ARRAYS 
(IARAYS) 


ASSIGN 
INDEX 
we 


ARE ALL YES 
FILES STOP 








YES SORT 
ARRAYS 


READ NEXT 
TIME 
(ROTME) 
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Subroutine IFILES 





OPEN FILES 


RETURN 
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Subroutine GETIME 





TO 


Subroutine [ARAYS 


START 


READ TIME 
(RDTME) 


ASSIGN 
LOGICAL 
UNIT 








RETURN 


LEO 


Subroutine RDTME 








READ 
EOF 
7 





YES 







READ 





ERROR RETURN 
—-_ 
ERROR 
MESSAGE 


stalk 


Subroutine COMPACT 


START 












AT LEAST 
TWO FILES 
OPEN 
? 


NO 


SHIFT 
ELEMENTS 


UPDATE 
COUNTERS 


CLOSE 
UNIT 


RETURN 


alee 








Subroutine SORT 


START 


INITIALIZE 


NO 
SET 
COMPARISON 
RANGE 


Se]; 
TERMINAL 
CONDITION 











IS 
EXCHANGE 
REQUIRED 
? 


MORE 
COMPARISONS 
REQUIRED 
7 


US 


YES 





EXCHANGE 
ELEMENTS 


SET 
TERMINAL 
CONDITION 


Subroutine CHCLK 






START 











INITIALIZE 
TERMINAL 
CONDITION 















TIME 
TO SEND 
RECORD 
? 


YES 
SEND 
RECORD 
(SNDREC) 


SET 
TERMINAL 
CONDITION 


RETURN 
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INCREMENT 
CLOCK 


Subroutine SNDREC 


READ 
RECORD 









RETURN 


ERROR 
MESSAGE 


LIES 


Program PULL 


START 


INITIALIZE 
VARIABLES 





io: 


Program PACK 


START 


/ 


Subroufine FNDATT 


INITIALIZE 


PACE 
INCREMENT : OR 
INDEX DELIMITER 


RETURN 


PROCESS 
ey 
CONVR 


INCREMENT 
& 
UPDATE 





ies 


Subroutine CONCAN 


CONCATENATE 
STRING 





Subroutine CONVRT 


START 








CORRECT 
TAG & ANUM 
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Subroutine ENTTUP 


START 


NO 


CORRECT 
TABLE 
7 





YES 


Val 
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